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IDENTIFICATION 


PRODUCT CODE: AC-18936-MC 

PRODUCT NAME: CVDHEBO DHV11-M TEST, ORION UFD 
PRODUCT DATE: MAY 1985 

MAINTAINER: Bruce Ribolini - MK Diagnostics Group 


AUTHOR: Bert Kleinschmidt 
Tony Grimshaw 


MODIFIED BY: Bert Kleinschmidt 

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 

COPYRIGHT (C) 1985 BY DIGITAL EQUIPMENT CORPORATION 

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS MASSBUS 
DEC DECUS DECTAPE 


SEQ 000 
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eeeee MODIFICATION HISTORY sees 


Originel release: 06 -Feb-84 Bert Kleinschmidt 
Created from CVDHAB, CVDHBC, and CVDHCB. 
Version BO 17-Jul-84 Bert Kleinschmidt 


Fixed typogrephicel errors discovered to date. 

Modified control of processor priority and LTC throughout 
the program to guarantees a less than 2 second 

response to a Break request while running under APT. 
Fixed bug in IAUTO Active test which caused an XON 
character to arrive late on processors with cache. 


Version 60 28 -Sep -84 Peter ONeil 
Modified VDHE.CUC to turn off clock if clock was enabled. 
Version BO 6-May -85 Howerd L. Marshell 


Found intermitent failure in IAUTO test because with faster 
CPUs, lest X-ON/X-OFF character does not get into the FIFO 
buffer in time to be read by routine. 

Changed test 29, IAUTO test, to provide pause when FIFO buffer 
is 1/2 filled (128. characters) instead of when FIFI buffer is 
3/4 filled (192. characters). 


Changed test 38, DMA Addressing Test to use KPARS instead of 
KPAR6, and as to not modify KPARO, 6 + 7. 


In addition, found test 40, DMA Transmission Test, to be a 
failure under the Extended monitor because the DRS and XXDP+ 
services require more time to execute the SETPRI + GETPRI 
macros. Substituted those macros with MIPS + MFPS respectively. 


ATTENTION: /NO RESTORE (of om IS ASSEMBLED INTO THIS DIAG. !!! 


Vv 
SHCCEKEEEESEEEEEKEEKESEEESASEEEEEEAEEEEEAEEEKESEEKEEEDEEEEERELEE ESE 
Found additional timing problems when running under the & 


extended DRS monitor on a PDP 11/23+ in test 3, Master reset «# 
skip selftest test. The DRS calls are consuming too much time «* 
and adversly affecting the timing of the critical loops in tests 
#3. Assembled in “/NORESTORE” into this source code by adding +* 
an argument (a 1) to the end of the HEADER macro. e 
SESCEEEEESEAESE EASES EASEASEEEEAEEESEEREREEEAEEAKESGEAEEEAEERESEESD 


ee ee & © & 





SEQ 0002 
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1.0 GENERAL PROGRAM CONSIDERATIONS 
1.1 PROGRAM ABSTRACT 


CVDHE is @ Functional Verification Test (FVT) for the DHV11-M 8 line 
esynchronous multiplexer. This program has been created for inclusion 
within the Orion User Friendly Diagnostic (UFD) system. 


The source file for Rev A of this program was created by merging the 
source files for CVDHAB, CVDHBC, and CVDHCB (The three parts of the 
DHV11-M FVT) and removing any code which required external loopback or 
other operator intervention. Speciel versions of the single character 
mode end DMA mode transmission and reception tests have been produced 
for this program to reduce the run time from that of the standard DHV 
FVT Cat the same time, reducing the test coverage). This program 
requires less than 30 seconds per DHV11-M for an error free pass. 

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC RUNTIME 
SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE THE INTERFACE 
TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. THIS PROGRAM CAN BE 
USED WITH XXDP+, ACT, APT, SLIDE AND PAPER TAPE. FOR A COMPLETE 
DESCRIPTION OF THE RUNTIME SERVICES, REFER TO THE XXDP+ USER‘S MANUAL. 
THERE IS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES IN THE OPERATING 
INSTRUCTIONS-COMMANDS OF THIS DOCUMENT. 


1.2 SYSTEM REQUIREMENTS 
The following hardware is required to run the DHV11-M FVT: 


© LSI-11 processor with at least 56 Kbytes of RAM. 
© DHV11 boards installed on the Q-bus. 


© Appropriate program load device supporting XXDP+ 
media or a down-line loading system. 


1.3 RELATED DOCUMENTS AND STANDARDS 
© DHV11-M Hardware Manual - This manual describes the 
functions and uses of the DHV11-M device. 


o XXDP+ User's Manual - Describes the running of 
diagnostics under the XXDP+ nonitor. 





SEQ 0004 
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1.4 DIAGNOSTIC HIERARCY PREREQUISITES 


The LSI-11 processor, the Q-BUS, the system memory, the 
console terminal, and the load media are assumed to have 


been tested and found working before this program is run. 


—— 








SEQ 0005 
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2.0 OPERATING INSTRUCTIONS 


THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME 
SERVICES. FOR DETAILED INFORMATION, REFER TO THE XXDP+ 
USER'S MANUAL (CHQUS). 


2.1 COMMANDS 


THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER’S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT ™NITIALIZING 

CONTINUE CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER tC) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING CALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 

DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION CIF IMPLEMENTED 


BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 
REPORTS SECTION OF THIS DOCUMENT) 


DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 
FLAGS TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 
ZFLAGS CLEAR ALL FLAGS (SEE FLAGS SECTION) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. SO 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “START”. 

MORE INFORMATION CAN BE FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 


THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD’. 


SWITCH EFFECT 

/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10. 


=01 01 oPaveeee 


SEQ 0006 
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THIS LIST WILL CAUSE TESTS 1,5,7,8,9,10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS :D0D000 EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS.SEE THE FLAGS SECTION 
OF THIS DOCUMENT. 
/EOP : DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 
DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 
IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 
START/TESTS:1-5/PASS: 1000/E0P : 100 


THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5S WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-5” INSTEAD OF “/TESTS:1-5". 


al A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 


TESTS PASS FLAGS EOP UNITS 


START x Xx X X X 
RESTART xX X Xx x xX 
CONTINUE X X X 

PROCEED Xx 

DROP X 
ADD X 
PRINT 

DISPLAY X 
FLAGS 

ZFLAGS 

EXIT 


SEQ 0007 
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FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER* INHIBIT ALL ERROR REPORTS 

IBR*s INHIBIT ALL ERROR REPORTS EXCEPT 


FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 


IXRe INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO’S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE “BELL” ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 


IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT. 
SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 
AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS: LOE: IER: BOE 
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2.4.1 START COMMAND - 

SEREEOE NE OEOD EEE EEE EEDE ESOS O46 4004046 0000000000000000000% 

STACRT)/TESTS:<TEST-LIST>/PASS: <PASS-CNT>/FLAGS: 
<FLAG-LIST>/EOP: <INCR> 

PASSER EESERERESEERES SEEDED EE EEED SEEDED EEEEEEEREEEEED DEEDES 


SEQ 0009 


2.4.1.1 Tests Switch (/TESTS:<TEST-LIST>) - 


<TEST-LIST> Is a sequence of decimal numbers (1:2 etc. ) 
or ranges of decimal numbers (1-5:8-10 etc.), seperated by 
colons, that specify the tests to be executed.Tests will be 
executed in numerical order regardless of the order of 
specification. The default is to execute all tests. On 
this and ell switches, the angle brackets <> are punctuation 
used in the definition only, and are not to be typed by the 
operator. See example at end of “Effect of Start Command” 
section. 


2.4.1.2 Pass Switch (/PASS:<PASS-CNT>) - 


<PASS-CNT> Is a decimal number indicating the desired 
number of passes. A pass is defined as the execution of the 
full diagnostic (all selected tests).The default is 
non-ending execution. In this case, exit from the program 
is accomplished either by typing a control/C or by occurance 
of an error with the halt on error flag being set. The exit 
is a return to command mode. See example at end of “Effect 
of Start Command” section. 


2.4.1.3 Flags Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> is a sequence of elements of the form 
<FLAG>, <FLAG=1>, or <FLAG=0>, separated by colons, where 
<FLAG> has one of the following values: 


HOE Halt on error, causing command mode to 
be entered when an error is encountered. 

LOE Loop on error, causing the diagnostic to 
loop continuously within the smallest 
defined block of coding (segment, subtest, 
or test) containing the error. 

IER Inhibit error reporting. 

IBE Inhibit basic error reports. 

IXE Inhibit extended error reports. 

PRI Direct all messages to a line printer. 

PNT Print number of test being executed. 

BOE Bell on error. 

UAM Run in unattended mode, bypassing manual 


-— 
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intervention. 

ISR Inhibit statisticel reports. 

IDU Inhibit dropping of units by diagnostic. 

LOT Loop on test. 
The flags named or equated to 1 are set, those equated to 0 
ere cleared. A flag not specified is cleared. If the flags 
Switch is not given all flags are cleared. See example at 
end of “Effect of Start Command” section. 


2.4.1.4 End Of Pass Switch (/EOP:<INCR>) - 


<INCR> Is a decimal number indicating how often (in 
terms of passes) it is desired that the end of pass message 
be printed. The default is at the end of every pass. See 
exemple at end of "Effect of Start Command” section. 


2.4.1.5 Effect Of Start Command - 


The effect of the start command is to initiate the 
hardware perameter dialogue, the software parameter 
dialogue, the initialization questions, and then the 
diagnostic commences testing. 


The hardware parameter dialogue commences with the 
question “® UNITS (D) ?” to which the operator should reply 
with the number of units to be tested. Following this are 
the questions whereby the P-Tables themselves are built. 
Each P-Table is a core-resident table containing all the 
hardware information for one complete unit.Each question is 
followed by the response radix (D for decimal, 8 for binary, 
0 for octel, L for Yes/No) in parentheses and the default 
value after the parentheses. For the actual Hardware 
P-Table questions see the “Hardware Parameters” section. 


Following the hardware questions are the software 
questions to build the software tables, which define 
operating parameters of the diagnostic program. These 
Questions are described in the “Software Parameters” 
section. 


EXAMPLE: 
STA/TESTS:1:3-4:/PASS:3/FLAGS: IER:HOE=1 


This command will ceuse three passes to be made, with 
each pass consisting of tests 1,3, and 4. There is no 
difference between saying <FLAG> and saying <FLAG=1>. The 
notation <FLAG=0> is meaningful only on a command other than 
start to clear a fleg that was previously set. Note that on 
all commands only the first three letters are scanned. 








SEQ 0010 
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2.4.2 Restart Commend - 
SERSASESEEESESESEEEHESESAEKEEKEEEEEEKESERERELALERAEEERERASS 
RESC(TART)/TESTS:<TEST-LIST>/PASS: <PASS-CNT>/FLAGS: 
<FLAG-LIST>/UNITS: <UNIT-LIST> 
SERSESEESEEEKEEESEEEKESEEES SEES EKEREEEAREEEEEEEASEEEEREREDRES 


2.4.2.1 Tests, Pass, And Flags Switches - 


<TEST-LIST>, <PASS-CNT>, and <FLAG-LIST> are as in the 
stert command. 


2.4.2.2 Units Switch (/UNITS:<UNIT-LIST>) - <UNIT-LIST> IS 
A_ SEQUENCE OF DECIMAL NUMBERS (0,1 ETC.) OR RANGES OF 
DECIMAL NUMBERS (0-5, 8-10 ETC.) THAT SPECIFY THE UNITS TO 
BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. THE 
NUMBERS MAY RANGE FROM 0 THRU N-1 (N IS THE NUMBER OF UNITS 
SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMBER 
INDICATES THE POSITION OF THE P-TABLE AS THE DATA WAS 
ENTERED DURING THE HAROWARE DIAGLOGUE. THE UNITS WHICH ARE 
SELECTED MUST NOT HAVE BEEN DROPPED BY THE DROP COMMAND. 
SEE__THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
BB ed ALL UNITS WHICH HAVE NOT BEEN DROPPED BY A DROP 


2.4.2.3 Effect Of Restart Command - 


The restert command differs from the start command in 
thet the P-Tables from the previous start command (there 
must have been one) are used, instead of new ones being 
built. The software dialogue may optionally be reexecuted 
Coperstor will be asked). The command can be used after 
command mode has been reentered in any of the three normal 
ways: a) the requested number of passes have been made, b) 
en error was encountered with the halt on error flag set, or 
¢) a control/C was entered by the operator. 


2.4.3 Continue Command - 

£64666666 666466606 06066646080606006 06646646645 6466666446 4646464464444 44% 
CONC TINUE )/PASS : <PASS-CNT/FLAGS : <FLAG-LIST> 

0666460466060 66460646 64466 0606464666464664646646066 0404046404646404646 4466484444 








SEQ 0011 
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2.4.3.1 Fleg Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> Is same as in the start command, but 
unspecified flegs retain their current value. 


2.4.3.2 Effect Of Continue Command - 


Continue must follow ea stert or restart, and command 
mode must heve been entered due to a halt on error or a 
control/C. The effect of the command is to go to the 
beginning of the test that was being executed when the halt 
or control/C took place. Softwere dialogue may optionally 
be reexecuted. Hardware perameters may not be changed. 


2.4.4 Proceed Command - 

$6660666606 066660000006 0660600000606 060000000604404000000004 
PROCC _ED)/FLAGS:<FLAG-LIST> 
$666066660666606660646006 06 066000060004664660000606066000000008 


2.4.4.1 Flegs Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> Is as in the start*command, but unspecified 
flags retain their current value. 


2.4.4.2 Effect Of Proceed Command - 


Proceed must follow a start, restert, or continue. 
Command mode must have been entered vie a halt on error. 
The effect of the command is to begin execution at the 
location following the error cell. Neither hardware nor 
softwere parameters may be altered. 


2.4.5 Add Commend - 
660606666 06 066000600606006004600646660000000000000000000604008 
ADD/UNITS: <UNIT-LIST> 
$6660.00 06666660606000006066060060600000000000046000000008646 


2.4.6 EFFECT OF ADD COMMAND - THE UNITS SPECIFIED ARE ADDED 
TO THE TEST SEQUENCE. EACH UNIT MUST HAVE A P-TABLE IN 
MEMORY DUE TO AN EARLIER HARDWARE DIALOGUE. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR CONTINUE. THE UNITS SWITCH 
MUST BE SPECIFIED. THE ADD COMMAND IS MEANINGFUL ONLY FOR 
UNITS THAT WERE PREVIOUSLY DROPPED. 





SEQ 0012 
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SEQ 0013 


2.4.7 Drop Command - 
$O0000000 000004600600 660000600000000006066000000000000000088 


DROCP )/UP ~~ 5: <UNIT-LIST> 
0664006 05 246066060006 060006000000000006460000500000000000008 





2.4.8 EFFECT OF DROP COMMAND - THE UNITS SPECIFIED WILL BE 
DROPPED FROM TESTING. THE UNITS WILL BE RESELECTED ONLY BY 
THE EXECUTION OF AN ADD OR START COMMAND. THE UNITS SWITCH 
MUST BE ENTERED. THIS COMMAND MUST BE FOLLOWED BY A RESTART 
OR A CONTINUE COMMAND. 


2.4.9 Print Command - 
$6006 6600060006 66000006 06000060 0000060060000006660060000008 


PRICNT) 
606066 6666406 6060646666666 60666646066 66066060066666604040604648466 


2.4.9.1 Effect Of Print Command - Error summary reporting 
is = implemented in this diagnostic, so this command hes 
no effect. 


2.4.10 Display Command - 
6666666664000 0000600606 0606060000000006060000006060060004646 


DISCPLAY)/UNITS: <UNIT-LIST> 
$60666666666606666600660466000000000000600000000600000000008 


2.4.10.1 Effect Of Displey Command - 


The hardware P-Tebles for all units ere printed in the 
format in which they were entered. 


2.4.11 Flege Command - 
0660606 66660606 000006006 0600 06060006000000000400000600000088 


FLACGS) 
0066066 66666066 066606 660660666 06040046000600004606606002004600088 


2.4.11.1 Effect Of Flegs Commend - 
The current settings of ell flegs ere printed. 
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2.4.12 Zflegs Commend - 
SORSESSHHSSESSEH SHES EAEHSHESASAESHESEKEASHEKERESEKEEOEEEDEESE 


ZFLCAGS ) 


SORA SHSHOAEASKESEHESASEH EAHA ESEKERESEEALEEOEREEEREDES 


2.4.13 Zflags Command - 


All flags ere cleared. 


2.4.14 Control Characters - 





C A control/C (C) entered during the execution of a 


diagnostic causes a return to command mode. 


ZA control /2Z (Z) entered duri one of the two 


operator dialogues-- hardware -Table dialogue or 
software P-Table dialogue causes the defaults to be 
taken for the remainder of that dialogue. 


A control/0 (0) entered during the execution of a 
diagnostic causes all teletype output to be 
surpressed for the remainder of the diagnostic or 
until another control/0 is typed, which restores 
normal teletype output. 


hin, meme 
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2.5 HARDWARE QUESTIONS 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT THE 
USER FOR HARDWARE INFORMATION BY TYPING “CHANGE HW (L) ?” YOU MUST 
ANSWER “Y" AFTER A START COMMAND UNLESS THE HARDWARE INFORMATION HAS 
BEEN “PRELOADED” USING THE SETUP UTILITY (SEE CHAPTER 6 OF THE XXDP- 
USER'S MANUAL). WHEN YOU ANSWER THIS QUESTION WITH A “Y”, THE RUNTIME 
SERVICES WILL ASK FOR THE NUMBER OF UNITS (IN DECIMAL). YOU WILL THEN 
BE ASKED THE FOLLOWING QUESTIONS FOR EACH UNIT: 


1. CSR ADDRESS - This question requests the CSR address of the 
spec fied DHV11. The default answer for this question is the 
lowest address in the PDP-1i1 fy oe, address space in which 
e DHV11-M can be placed (160460 Octal). 


2. INTERRUPT VECTOR ADDRESS - This question requests the 
interrupt vector address of the specified DHV11. 


3. BR Level - This questions requests the interrupt BR level of 
the DHV1i1. 


2.6 SOFTWARE QUESTIONS 


This program contains no software P-table questions. Because of this 
mo “CHANGE SW (L) ?” prompt is issued during program execution. 


SEQ 0015 
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2.7 EXTENDED P-TABLE DIALOGUE 


WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES IN A 
TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST WAY TO 
BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH UNIT TO BE 
TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS A MASS STORAGE 
CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION DEVICE WITH SEVERAL 
LINES, THIS BECOMES TEDIOUS SINCE MOST OF THE ANSWERS ARE REPETITIOUS. 


TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING A 
FICTIONAL DEVICE, THE XY11. SUPPOSE THIS DEVICE CONSISTS OF A CONTROL 
MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. THESE UNITS ARE 
DESCRIBED BY THE OCTAL NUMBERS 0 THROUGH 7. THERE IS ONE HARDWARE 
PARAMETER THAT CAN VARY AMONG UNITS CALLED THE Q-FACTOR. THIS 
Q-FACTOR MAY BE ©OR 1. BELOW IS A SIMPLE WAY TO BUILD A TABLE FOR 
ONE XY11 WITH EIGHT UNITS. 
@ UNITS (0D) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? O<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 2 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 1<CR> 
Q-FACTOR (0) 1 ? O<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE #@ (0) ? 2<CR> 
Q-FACTOR (0) 0 ? «CR» 


UNIT 4 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 3<CR> 
Q-FACTOR (0) 0 ? <CR> 


SEQ 0016 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 6<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 8 

CSR ADDRESS (0) 160000<CR> 
SUB-DEVICE # (0) ? 7<CR> 
Q-FACTOR (0) 1 ? <CR> 


NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 


AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 


L 
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SEQ 0017 


NOT VERY EFFICIENT. 


THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
jaa THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


@ UNITS (0) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0,1<CR> 
Q-FACTOR (0) 0 ? 1,0<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 2-5<CR> 
Q-FACTOR (0) 0 ? O<CR> 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 6,7<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE 

“-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE, SUB-DEVICES 
2. 3, 4 AND 5 WERE SPECIFIED. (CIF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 

THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND 0 RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 


@ UNITS (D) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0-7<CR> 
Q-FACTOR (0) 0 ? 0,1,0,.,,1,1<CR> 


AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 


—— 
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2.8 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 


—— 


Zs 
2. 


4. 
5. 
6. 


BOOT XXDP-+ 


GIVE THE DATE AND ANSWER THE LSI AND SOHZ (CIF THERE 
IS A CLOCK AND THE QUESTION IS ASKED) QUESTIONS 


TYPE “R NAME”, WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 


TYPE “START” 
ANSWER THE “CHANGE HW” QUESTION WITH “Y” 
ANSWER ALL THE HARDWARE QUESTIONS 


WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE DEFAULTS FOR 


FLAGS. 


FOR DEFAULT INFORMATION SEE THE SECTIONS WITHIN THIS DOCUMENT 


ON FLAGS, AND HARDWARE QUESTIONS. 


3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 





THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE “IER” FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 


THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC:XXXXXX 
ERROR MESSAGE 


WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR NUMBER 
UNIT NUMBER = 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 

INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 

he as OR “IBR” FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 
UM ° 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “IER”, “IBR” OR “IXR” FLAGS ARE SET (SEE THE 
FLAGS SECTION OF THIS DOCUMENT). * 

THESE MESSAGES ARE PRINTED AFTER THE .ASSOCIATED GENERAL ERROR 





SEQ 0018 
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—— 





MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 ERROR MESSAGES 


This program is intended to provide a go/no-go indication of the 

functionality of OHV11-M boards. To execute the program in this mode 
the operator can run with the inhibit basic error reporting switch. 

In this mode the program prints error messages which contain the error 

message header described above, plus the name of the failing test. 

For a list of the test names in this program see the test summaries 

section of this document. An exemple of such an error message is the 

following: 


CVOHE DVC FTL ERR 01603 ON UNIT 02 TST 015 SUB 000 PC: 015244 
DEVICE REGISTER WORD READ/WRITE TEST 


This error indicates that a fatal error was encountered within the 
test which tests the read/write capability of the DHV11-M registers. 


If the operator requires more extensive error reporting he can run 
with all error reporting enabled by not using the inhibit reporting 
switches. The ebove error message would then become the following: 


CVDHE DVC FTL ERR 01603 ON UNIT 02 TST 015 SUB 000 PC: 015244 
DEVICE REGISTER WORD READ/WRITE TEST 
BAD BIT(S) IN DEVICE TBUFFAD1 REGISTER FOR LINE 7 (D). 
EXPECTED DATA: 000000 (0). 
ACTUAL DATA: 000023 (0). 





SEQ 0019 
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4.0 PERFORMANCE AND PROGRESS REPORTS 


AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE TOTAL 

NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. THE “EOP” 

SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END OF PASS MESSAGE IS 

oes FOR FUTHER INFORMATION SEE THE SWITCHES SECTION OF THIS 
UMENT. 





5.0 TEST SUMMARIES 
The following tests are included within CVDHE: 


1. Device register address test - Verifies that the UUT 
registers will respond witht the proper Q-BUS handshak ing 
when accessed. Verifies that the UUT is at the proper 
address. 


2. MASTER.RESET (Selftest) test - Verifies that the MASTER.RESET 
bit clears within a specified time of it being set. 


3. MASTER.RESET (Skip Selftest) test - Verifies that the 
MASTER.RESET bit clears within a short time after it is set 
if the skip selftest sequence is used. 


4. RX.CHARACTER field test - Verifies that the date bits of the 
codes in the FIFO after a reset and skip selftest are 
consistant with the skip selftest codes. 


5. Reception flag field test - Verifies that the 3 data status 
bits (COVERRRUN, FRAMING, and PARITY error bits) are all set 
on all of the skip selftest codes in the FIFO after a reset 
and skip selftest sequence. 


6. RX.DATA.AVAIL test - Verifies that the RX.DATA.AVAIL bit is 
set when the skip selftest codes are in the FIFO and that it 
clears after they ere read. 


7. RX.DATA.VALID test - Verifies that the RX.DATA.VALID bit is 
set for each valid skip selftest code in the FIFO and clear 
efter all valid codes are read. 


8. RX.LINE field test - Verifies that the RX.LINE fields are 
correct for the skip selftest codes. 


9. BMP run test - This test runs the BMP and verifies that it 
does not fail within a specified period. This test should 
signel problems that the BMP codes could cause with later 
tests. 


10. Skip selftest test - This test verifies that if the selftest 
is skipped the proper codes are placed in the FIFO and that 
no errors are encountered. 
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—— 


11. 


12. 


13. 


14. 


15. 


16. 


17. 


18. 
19. 


20. 


21. 


22. 


23. 


24. 


25. 


26. 





DIAGNOSTIC .FAIL (Skip selftest) test - This test verifies, by 
using the skip selftest sequence, that the DIAGNOSTIC.FAIL 
bit will go to both the active and inactive states. 


Selftest run test - Verifies that no errors are found by the 
execution of the selftest. 


Selftest fail test - Verifies that the selftest will report 
errors correctly when it is forced to fail. 


Word access read/write test - Verifies that the registers 
respond correctly to word read and write accesses. 


Word access read/modify/write test - Verifies that the 
registers respond correctly to read/modify/write word 
accesses. 


Byte access read/write test - Verifies that the registers 
respond correctly to byte read and write accesses. 


Byte access read/modify/write test - Verifies that the 
registers respond correctly to read/modify/write byte 
accesses. 


ID.BIT test - Verifies that the ID.BIT reads as a zero. 


No TX.DATA.VALID/No TX.ACTION test - Verifies that if a date 
word is written without the TX.DATA.VALID bit set, no 
TX.ACTION is generated. This test does not require that 
cheracters are TXed. 


TX.DATA.VALID / TX.ACTION test - Verifies that if a data word 
is written with the TX.DATA.VALID bit set, it generates a 
corresponding TX.ACTION. This test does not require that 
cheracters are TXed. 


TX.ENABLE inactive test - Verifies that if the TX.ENABLE bit 
is clear no transmission occurs. 


TX.ENABLE active test - Verifies that TX occurs if the 
TX.ENABLE is set. 


Interrupts test - Verifies that the TX and RX interrupts are 
functioning correctly. 


BR level test - Verifies that the WT generates TX and RX 
interrupts at the correct BR level. 


DIAG field (BMP) test - Verifies that a request for BMP code 
reporting is answered by the UUT within the specified time. 


DMA.START test - Verifies that each DMA.START bit will 
initiate a DMA TX on a line. 





SEQ 0021 
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27. 


28. 


29. 


30. 


31. 


32. 


33. 


34. 


35. 


36. 


37. 


38. 


39. 


40. 


41. 





DMA.ABORT test - Verifies that the DMA.ABORT bit on each line 
will stop e DMA transmission and return a TX.ACTION and that 
the DMA can then be restarted. 


I.AUTO inactive test - Verifies that the UUT will not 
peearems end TX XON or XOFF characters in response to the 
IFO conditions if the I.AUTO bit is inactive. 


I.AUTO active test - Verifies that the UUT will generate and 
TX XON and XOFF characters in response to the FIFO conditions 
if the I.AUTO bit is active. 


FIFO date test - Verifies that the FIFO will hold 256 
characters without corrupting date. 


FIFO 3/4 level inactive test - Verifies that the FIFO 3/4 
alarm does not become active until the FIFO becomes 3/4 full. 


FIFO 3/4 level active test - Verifies that the FIFO 3/4 alarm 
becomes active, and remains active, when the FIFO is more 
then 3/4 full. 


FIFO 3/4 level active/inactive test - Verifies that the FIFO 
3/4 alerm, once activated, remains active until the FIFO 
level is reduced below 1/2. 


FIFO 1/2 level test - Verifies that FIFO 1/2 level indicator 
becomes active and remains active as the FIFO level is 
reduced below the 1/2 full point. 


BREAK test - Verifies that setting the BREAK bit on any line 
causes that line to go to a spacing state and that clearing 
the BREAK bit removes the line from the spacing state. 


No OVERRUN.ERROR test - Verifies that the UUT will receive 
the maximum number of characters without causing an overrun 
error. 


OVERRUN.ERROR test - Verifies that if more than the maximum 
number of characters are sent to the UUT overrun errors 
eccur. 


DMA Addressing test - Verifies that the UUT can access the 
full memory which is on the host machine via DMA accesses. 


Short single character mode TX/RX test - Verifies that the 
UUT will TX and RX data correclty in single character mode. 


Short DMA mode TX/RX test - Verifies that the UUT will TX and 
RX dete correctly using DMA transmission. 


Report BMP codes test - This pseudo test reports the first 32 
BMP codes which were discovered in the FIFO during the 
execution of the other tests. This avoids the interruption 
of other tests by these codes, if they are not critical to 
the tests being performed. 






SEQ 0022 
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6.0 EXAMPLE ERROR FREE PASS 


The ee ig is an example of an error free pass on two units using 
22 ~ ma lags or DRS options: 


VOHEBO. BIC 


ORS 

CVDHE -B-0 

OHV11-M TEST, ORION UFD 
UNIT IS DHV11-M 
RESTART ADDR: 147670 
DR>STA 


CHANGE HW (L) ? Y 
@ UNITS (D) 72 





SEQ 0023 


UNIT 0 
CSR ADDRESS: (0) 160460 ? tZ 


UNIT 1 

CSR ADDRESS: (0) 160460 ? 160040 
INTERRUPT VECTOR ADDRESS: (0) 300 ? 320 
INTERRUPT BR LEVEL: (0) 4? <CR> 


CVDHE EOP 1 
O CUMULATIVE ERRORS 


tC 
DOR> EXIT 
€ 
1085 -LIST SEQ,LOC,BIN,MEB 
1086 “NLIST CND 
1087 000000 -ENABLE AMA,ABS,LC ; $$$ 





r-— 
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1089 
1090 


000000 


000000 


002000 


000001 
000001 
000001 
000001 
000001 


002000 





SEQ 0024 


; edatahatadadedatalatedaialaialatalailaialsiaisininininisinininininininininisinniamgnuuuuuenanecerc EE 
3 
3 VOHE . PHO 


; 

F bai shatalalalniaiatlaialsiniilninisinininininitinininininicisisuiiieeeei iii rit i ttt ttt TTR TTR TT PERE EEN 

-SBTTL Program Header 
-MCALL SVC 
Svc 


s INITIALIZE SUPERVISOR MACROS 
Thal ahatahad ahaladadabalalalaletalaisiainistaininiaiiaisinisaiaingaiaimaaanesmericncce 


; IF STRUCTURED MACROS ARE TO BE USED, ADD “.MCALL STRUCT” AND “STRUCT” 
; TO INITIALIZE THE STRUCTURED MACROS. 

SVCINS= 1 ; LIST INSTRUCTIONS, SHIFTED RIGHT 

SVCTST= 1 ; LIST TEST TAGS, SHIFTED RIGHT 

SVCSUB= 1 ; LIST SUBTEST TAGS, SHIFTED RIGHT 

SVCGBL= 1 ; LIST GLOBAL TAGS, SHIFTED RIGHT 

SVCTAG= 1 ; LIST OTHER TAGS, SHIFTED RIGHT 


; CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 

5 TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

; SYMBOLS TO BE MINUS-ONe TO NOT LIST THE EXPANSIONS. YOU MAY 

; CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 

5 566 Sis si shh hh as sg sek se sh pi sig sss ps ap sys in sig sigs pp pi sigs se ns i snk se ns gs se Sed nd hs ed sed gd 


-ENABL ABS 
-ENABL AMA 
. * 2000 


BGNMOD 


3+ 
; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
cdl 


POINTER BGNSW,BGNDU, ERRTBL 


HEADER CVDHE,6,0,15,0,PRIO7,1 

LS$NAME: : 
«ASCII /C/ 
«ASCII /V/ 
«ASCII /0/ 
-ASCII /H/ 
«ASCII /E/ 
-BYTE 0 
-BYTE 0 
-BYTE 0 

LSREV:;: 
-ASCII /8/ 
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002911 





LSUNIT:: 
LSTIML:: | 
LSHPCP:: 
L$SPCP:: 
LSHPTP:: | 
L$SPTP:: 
LSLAOP:: 
LSSTA:: 
L$CO:: 

LSOTYP::" 
LSAPT:: 
LSOTP:: 
LSPRIO:: 
LSENVI:: 
LSEXP1:: 
LSMREV:: | 


-BYTE 


-WORD 
- WORD 


LSEF:: 


L$SPC:: 

LSDEVP:: 
LSREPP:; 
LSEXxPa:; 
LSEXPS:: | 


WORD 
WORD 
WORD 
WORD 


L$AUT:: 
L$OUT:: 
LSLUN:: 
LSDESP:: 


WORD 
L$LOAD:: 
EMT 


L$HW 
L$Sw 
LS$LAST 
0 

0 

0 

0 
L$DISPATCH 
PRIO7 
0 

0 


C#REVISION 
CsEDIT 


.) 
0 


0 
LSOVTYP 
0 
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002102 LSETP:: 

002102 005464 -WORD LSERRTBL 
002104 LSICP:: 

002104 041474 «WORD LSINIT 
002106 LSCCP:: 

002106 042276 -WORD LSCLEAN 
002110 LSACP:: 

002110 042274 «WORD LS$AUTO 
002112 LSPRT:: 

002112 041466 -WORD LSPROT 
002114 LSTEST:: 

002114 000001 -WORD 1 
002116 LSOLY:: 

002116 000000 «WORD 0 
002120 LSHIME:; 

002120 000000 «WORD 0 

1150 
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1170 


002122 








ee eS 


-SBTTL DISPATCH TABLE 


see 

; THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
s IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 
_— 


DISPATCH 41 


- WORD 
LSDISPATCH:: 
oW 
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1178 
1179 
1180 
1181 
1182 
1183 


1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 


1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 


002246 
002246 
002250 
002250 


002250 
002252 
002254 
002256 
002257 


002260 
002260 


000004 


160460 
000300 
000377 
001 
004 





inti cman eee ieee ee 







SEQ 0028 


hs dadahatahatadalaialahnialnininininilaininininininiininiinii niet ii titi tet ttt tt tt TL Te TTT Eee ey 


; 
: VOHE . DHT 


é 
3 Ledadabatabaiabatatatahetadaiaiatalainiainisinianiaiiniaininininininininiginininiainaaainaiccinuncaiiceci ET 


-SBTTL DEFAULT HARDWARE P-TABLE 


+ aed 

; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
; THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
; IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
; AND IS USED AS A “TEMPLATE” FOR BUILDING THE P-TABLES. 


BGNHW =DFPTBL 
-WORD L10000-L $HW/2 


LSHW:: 
OFPTBL:: 

. WORD 160460 ;Default CSR Address 

-WORD 300 sDefault Vector Address 

-WORD 377 sDefault Active lines bit map 

.BYTE 1 sDefault Loopback mode 

-BYTE 4 ;Default BR Level 

ENDHW 


NN nS 
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SEQ 0029 


1207 3 ed ababatatadedaiahaiatatalalahsininialainisiniainininisinininininininininininiaisiniaininieisininieinicuinciiccmc PET 


VOHE . SWT 


i 
; 
1210 ; 
3  hatabaiabalahatelaiaialahatalsintninisininiinininininininininininininisinnininuiuiiyi eri tir tit ttt tL TRE LTTE RE EEE 


1215 -SBTTL SOFTWARE P-TABLE 


1217 see 

1218 ; THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 
1219 ; PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
1220 ; SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
1221 ; AT RUN TIME. 

1222 fe 


1224 002260 BGNSW SFPTBL 
002260 000002 -WORD 1&10001-L$SwW/2 
002262 L$SW:: 

— 002262 SFPTBL:: 

1226 002262 000000 OPTION: : -WORD 0O ;NO UNIT @ OR DMA ADR WIDTH PRINTOUT. 

1227 002264 000000 NDERPT: : -WORD 0O sDISABLE ERROR SUMMORY REPORTING. 


1229 002266 ENDSW 
002266 L10001: 
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SOFTWARE P-TABLE 


-— 


1231 
1232 


1233 


1292 002266 


000010 
000377 


000000 
000002 
000002 
000004 
000006 
000010 
000012 
000014 
000016 


000020 
000030 
000100 


100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 





3 edad hataadadatatadadatatatahalahaialatalaaiaiaiaiaiaiiniaiaiinainiaisiainsineieiiliiiii iii tt tt tT TTT TE ERE EEE En m en 


VOHE . EQU 
, Ledatadadalaiatatalniaiaialsisisinisininininininininiinininisinininisinainininuiinuuiemuuiiti titi tt tt TTR TR TRL CREE EET 


-SBTTL GLOBAL EQUATES SECTION 


zee 


; THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
; ARE USED IN MORE THAN ONE TEST. 


peeeene 


peeeeee 


NUMLNS ==10 
MAPLNS==377 


DEVICE REGISTER 
CSRO==0 


RBUF O==2 
TXCHRO==2 
LPRO==4 
STATO==6 
LNCTRO==10 
TXAD10==12 
TXAD20==14 
TXBFCO==16 


sNUMBER OF LINES ON DHV11 IS 8. 
sBIT MAP OF LINES ON DHV11. 


OFFSETS FROM THE CSR‘S ADDRESS seeeee 

sCSR REGISTER OFFSET FROM THE CSR ADDRESS 

sRECEIVE REGISTER OFFSET FROM THE CSR ADDRESS 

s TRANSMIT REGISTER OFFSET FROM THE CSR ADDRESS 

sLINE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 
sSTATUS REGISTER OFFSET FROM THE CSR ADDRESS 

sLINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 
sTRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADDRESS 
sTRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS 
s TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 


EQUATES USED WITH RESPECT TO THE RX BUFFER «sees 


RXBETX==16. 
RXBDTX==24, 
RXBFUL==64. 


EQUALS 


; 
; BIT DIFINITIONS 


BIT15== 
BIT14== 
BIT13== 
BIT12== 
BIT11== 
BIT10== 
BITO9== 
BITO8== 
BITO7== 
BITO6== 
BITOS== 
BITO4== 
BITO3== 


100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 

20 

10 


BITO2== 4 
BITO1s= 2 


sLEVEL OF RX BUFFER AT WHICH TO RE-ENABLE TRANSMISSION. 
sLEVEL OF RX BUFFER AT WHICH TO DISABLE TRANSMISSION. 
sTOTAL CHARACTER CAPACITY OF THE RX BUFFER. 












SEQ 0030 
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—— 


1293 











SEQ 0031 


BITOO== 1 


; 

BIT9== BITO9 
BIT8== BITO8 
BIT7=*= BITO7 
BIT6*= BIT06 
BITS== BITOS 
BIT4== BITO4 
BIT3== BITO3 
BIT2== BIT02 
BITi== BITO1 
BITO== BITOO 


; 
; EVENT FLAG DEFINITIONS 


; EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
; 


; ; BIT POSITION IN SECOND STATUS WORD 

EF .START== 32. s €100000) START COMMAND WAS ISSUED 

EF .RESTART== 31. s (040000) RESTART COMMAND WAS ISSUED 

EF .CONTINUE== 30. s (020000) CONTINUE COMMAND WAS ISSUED 

EF .NEW== 29. s €010000) A NEW PASS HAS BEEN STARTED 

EF .PWR== 28. + €004000) A POWER-FAIL/POWER-UP OCCURRED 


; 
; 
; PRIORITY LEVEL DEFINITIONS 


PRIO7== 340 
PRI06== 300 
PRIOS== 240 
PRIO4== 200 
PRIO3== 140 
PRIO2== 100 


PRIO1== 40 
PRIOO== 0 

: 

sOPERATOR FLAG BITS 
: 

EVL== 4 
LOT== 10 
ADR== 20 
IDU== 40 
ISR== 100 
UAM== 200 
BOE== 400 


PNT== 1000 
PRI== 2000 
IXE== 4000 
IBE== 10000 
IER== 20000 
LOE== 40000 
HOE== 100000 
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002266 
002270 
002272 
0C2274 
002275 
002276 


002300 
002300 
002302 
002304 
002306 
002310 
002312 
002314 
002316 


002320 
002322 
002324 
002326 
002330 
002332 
002334 
002336 


002340 
002342 








hh alahatatatalataialataialainlninininininininintinininitsisiiniui ui init t ttt ttt tT tt TTL TT TRE PPE PE an 


; VOHE .GDT 
° 
h hadahatabatabatalalalsialaialstalniginininininiininitnininininininsininpinnuiiiui uit iitit tt tt TTR RR TTN 


-SBTTL GLOBAL DATA SECTION 


34 


; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 


; IN MORE THAN ONE TEST. 


RRERAAEAEEEEEEEEEERERESEREREAAAEEEEEEEEEREAEEREEEEEEEES ERED REEEREEES 
Unit Varible Area 
FRRRREEEAEAEEEEEEEEEEREAEREEEEAEAEREEEESESEREREEEEEEEEEAEREERERAEELESES 


RXVECA:: 
TXVECA:: 
ACTLNS:: 
LOPBCK:: 
BRLEVL:: 
UNITN:: . 


. WORD 
. WORD 
. WORD 
-BYTE 
-BYTE 
WORD 


0 


sRX VECTOR ADDRESS. 

;TX VECTOR ADDRESS. 

sACTIVE LINE BIT MAP. 
sLOOPBACK MODE 

sINTERRUPT BUS REQUEST LEVEL 
sUNZT NUMBER. 


FESEEREEEEAEAEEAEEEREEEAEEAALESEAEEEEEREARERARAGEEEERARERESEEEALALE LE LES 
; Device Register Address Table e@ 
§ SER EREE EL ESEEEEEEEEEEEEEEEEEEEEEEEEEREEEEEEOEEEESEEEEEEEEEEREDRREEELES 


DRADRT:: 
CSRA:: 
TXCHA:: RBUFA:: 
LPRA:: 
STATA:: 
LNCTRA:: 
TXADIA:: 
TXAD2A:: 
TXBFCA:: 


- WORD 
- WORD 
-WORD 
-WORD 


. WORD 
. WORD 
. WORD 
. WORD 


160000 
160002 
160004 
160006 
160010 
160012 
160014 
160016 


sDHV11-M CSR ADDRESS 

sDHV11-M RECEIVE/TRANSMIT BUFFER ADDRESS 
sDHV11-M LINE PARAMETER REGISTER ADDRESS 
sDHV11-M STATUS REGISTER ADDRESS 

sDHV11-M LINE CONTROL REGISTER ADDRESS 

sDHV11-M TRANSMIT BUFFER 1 REGISTER ADDRESS 
sDHV11-M TRANSMIT BUFFER 2 REGISTER ADDRESS 
sDHV11-M TRANSMIT BUFFER COUNT REGISTER ADDRESS 


FREER EEEAEREREREEEREEEAEEEEEEEAEARESEEAEAEEEEEASAREEALAERALEDER ERE EES 
3 Bit mask table of un-used DHV11-M device register bits. 
FREREREEEAAAEEEAEAEESSESEEEEEEEEERERESSAEEESEREAREREEEAESESAAERERERERREE 


UNBTTB::. 


sUNUSED BIT MASK FOR THE CSR 

sUNUSED BIT MASK FOR THE RBUF/TX REG 
sUNUSED BIT MASK FOR THE LPR 

sUNUSED BIT MASK FOR THE STAT 
sUNUSED BIT MASK FOR THE LNCTRL 
sUNUSED BIT MASK FOR THE TBUFFAD1 
sUNUSED BIT MASK FOR THE TBUFFAD2 
sUNUSED BIT MASK FOR THE TBUFFCT 


FREEEREEREEEEAEEEEEAEEEESEAAEEEAEEEEERERAAEEAREAAEAEAREEEE RA SERRARSALEAREREEEAL 


; Register Message Address Table 
FEREEEEREEEEEAEEASEESEBESSEEEEEAEEAAEEAEEEEESEAEREEAEEAEEAEREEARAEEARAEALERE‘RS 


RMATBB: : 


WORD 137660 
-WORD 177777 
-WORD 7 

-WORD 177777 
-WORD 166051 
-WORD O 

-WORD 77700 
-WORD O 

«WORD DROOMG 
WORD DRO2MG 





sADDRESS OF “CSR” MESSAGE. 
sADDRESS OF “RBUF” MESSAGE. 






















SEQ 0032 
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1352 002344 


1405 002464 
1406 002466 
1407 002470 
1408 002472 


—— 


010655 
010661 
010666 
010675 
010706 
010717 


000000 
177777 


000000 
000000 
000000 
000000 


177546 
000300 
000100 
000074 
000000 
000000 
000170 
000170 
000021 
000062 


177572 
172516 
000000 
000000 


- WORD 
- WORD 
- WORD 
- WORD 
- WORD 
- WORD 


sADDRESS OF “LPR” MESSAGE. 
sADDRESS OF “STAT” MESSAGE. 
sADDRESS OF “LNCTRL” MESSAGE. 
sADDRESS OF “TBUFFAD1” MESSAGE. 
sADDRESS OF “TBUFAD2” MESSAGE. 
sADCRESS OF “TBUFFCT” MESSAGE. 


FRRRREAERERE SESE SEREEEAEEEAEEEESEEEEEEREAAEEARESEEESARAEAEEEAEEEDREREEEREREELES 


; Assorted global variables: 
FESRRAEEEEEEAESEREEEEREDEDESEDEE EERE REEDS EE OEOS OS OD ODES EEEEEEEEEDEEEEEDED REESE 


BUFPTR:: 
CTRLCF:: 


TSTNUM:: . 


IBM: : 


LGRP1M:: . 
LGRPOM:: . 
IESTAT:: . 
PASCNT:: . 


WORD1: : 


RXTOUT:: . 
SAVTEN:: . 
SAVPRI:: . 
TXENBM:: . 
RXINTC:: . 
RXINTF:: . 
TXINTC:: . 
TXINTF:: . 


. WORD 
- WORD 


0 


coooco 


'oooooceo 
rey 


oooo 


sSTORAGE FOR RECEIVE CHARACTER BUFFER POINTER. 
sSTORAGE FOR THE CONTROL-C FLAG. 

sSTORAGE FOR THE TEST NUMBER. 

sINACTIVE TX/RX BITS MASK. 

sBIT MAP OF LINES IN LINE GROUP I. 

sBIT MAP OF LINES IN LINE GROUP IT. 

sSTORAGE FOR STATES OF THE DUT INT ENABLE BITS. 
sSTO'G FOR PASS COUNT USED IN ROM VERSION@ TST. 
sLOCATION FOR PASSING INDIRECT PARAMETERS. 
sTIME-OUT VALUE FOR WAITING FOR LAST RX CHAR. 
sSTORAGE FOR TX.ENABLE STATES, (TXROFF, TXRON). 
sSTO‘G FOR PROCESSOR PRIORITY, (TXROFF, TXRON). 
sSTORAGE FOR TX.ENABLE STATES, (BUFFER MGM’‘NT). 
sSTORAGE FOR RECEIVER INTERRUPT FLAGS. 

sSTORAGE FOR RECEIVER INTERRUPT FLAGS. 

sSTORAGE FOR TRANSMIT INTERRUPT COUNT. 

sSTORAGE FOR TRANSMIT INTERRUPT FLAGS. 

sSTORAGE FOR THE NORMAL 004 TRAP VECTOR. 

sFLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS. 
sNUMBER OF BITS HOST USES TO DEFINE A UNIQUE 
sADOR. -1= 16 BITS, O= 18 BITS, 1= 22 BITS. 


sSTO'G FOR ADR OF FIRST FREE WORD AFTER THE DIAG‘ TIC 


sSTO’'G FOR DMA TEST ADDRESS CIN PAR FORM). 
sWORD FOR GMANxx CALL RETURN PARAMETERS. 
sFLAG INDICATING WHETHER TO PRINT MODEM STATUS. 


FRRESERERE EERE EASES AAEAEEAESEEEEAAAREAAESEASASEERREEAEAEALEAEEASAREEREERRRARES 


; Line Time Clock variables and storage. 
FERREEEEREESEEEREAEEEEEAEEEE ESE EREAEEAAEEESSRAREESAREREREEEAEEREEEREREEREEEEEE 


CLKCSR:: 
CLKBRL: : 


CLKVEC:: . 
CLKHRZ:: . 
TIMER1:: . 
TIMER2:: . 
TIMERS:: . 
BCOUNT:: . 
MSTICK:: . 
MSLCNT:: . 


. WORD 
- WORD 


177546 
PRIO6 
100 


sCSR ADDRESS OF THE LTC. 

sINTERRUPT PRIORITY LEVEL OF THE LTC. 
sINTERRUPT VECTOR ADDRESS OF THE LTC. 
sINTERRUPT FREQUENCY OF THE LTC. 

sHARDWARE CLOCK COUNTER #1. 

sHAROWARE CLOCK COUNTER ¢2. 

sHARDWARE BREAK COUNTER LOCATION. 

sBREAK COUNT VALUE IN CLOCK TICKS. 

sNUMBER OF MILLI-SECONDS PER LTC TICK. 
sLOOP COUNT CUSED BY MSLOOP) TO DELAY 1 MS. 


FF haath ett Litt TTT TTT TTT tit TT TT TTT TTT TTT TT TTT TTT TTT TTT TTT TT 
; Memmory Management Variables and Flags. 
jREREEEEEEEE EE ESOS EE EEEE EEE EEE ES EERE OE OEE OE EEE OOOO EEK EEEEEEEEEREEEOE EES 


MMSRO: : 
MMSR3:: 
MMPRES: : 
MMENAB: : 


- WORD 

- WORD 
. WORD 
- WORD 


177572 
172516 
0 
0 





sADDRESS OF MEM MGT STATUS REGISTER 40. 
sADDRESS OF MEM MGT STATUS REGISTER 43. 
sMEM MGT PRESENT FLAG (O IF MM NOT PRESENT). 
sMEM MGT ENABLED FLAG (O IF MM NOT ENABLED). 
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SEQ 0034 






1409 
1410 002474 PARATB: : sBASE OF MEM MGT PAR ADDRESS TABLE. 
1411 002474 172340 PAROA:: .WORD 172340 ;ADDRESS OF MEM MGT PAR #0. 
1412 002476 172342 PARIA:: .WORD 172342 ;ADDRESS OF MEM MGT PAR @1. 
1413 002500 172344 PAR2A:: .WORD 172344 ;ADDRESS OF MEM MGT PAR 62. 
1414 002502 172346 PARSA:: .WORD 172346 ;ADDRESS OF MEM MGT PAR 03. 
1415 002504 172350 PARSA:: .WORD 172350 ;ADDRESS OF MEM MGT PAR 04. 
1416 002506 172352 PARSA:: .WORD 172352 ;ADDRESS OF MEM MGT PAR @5. 
1417 002510 172354 PAR6A:: .WORD 172354 ;ADDRESS OF MEM MGT PAR #6. 
1418 002512 172356 PAR7TA:: .WORD 172356 ;ADDRESS OF MEM MGT PAR 07. 
rae 002514 PARATE: : sEND OF PAR ADDRESS TABLE. 
1421 002514 PDRATB: : sBASE OF MEM MGT PDR ADDRESS TABLE. 
1422 002514 172300 PDROA:: .WORD 172300 ;ADDRESS OF MEM MGT PDR 00. 
1423 002516 172302 PORIA:: .WORD 172302 ;ADDRESS OF MEM MGT PDR ¢1. 
1424 002520 172304 PDOR2A:: .WORD 172304 ;ADDRESS OF MEM MGT PDR ¢2. 
1425 002522 172306 PDR3A:: .WORD 172306 ;ADDRESS OF MEM MGT PDR 03. 
1426 002524 172310 PORSA:: .WORD 172310 ;ADDRESS OF MEM MGT PDR 04. 
1427 002526 172312 PORSA:: .WORD 172312 ;ADDRESS OF MEM MGT PDR @5. 
1428 002530 172314 POR6A:: .WORD 172314 ;ADDRESS OF MEM MGT POR #6. 
1429 002532 172316 POR7A:: .WORD 172316 ;ADDRESS OF MEM MGT PDR #7. 
cone 002534 PDRATE: : sEND OF MEM MGT PDR ADDRESS TABLE. 
1432 FRREEREEAEREERAEASAEEEEE REESE EEAEEEAEEREAESEREEREREEEREAEEREREAEEAEEEEREREEEREEE 
1433 3 Table of words with corresponding bit set for generation of bit maps. 
1434 FRRREREEEEEEEEEEEAEEEERAAEREREAEESEAAEEAESEAREREAEREEEEEEREAEREREREDEAEREE REESE 
1435 002534 000001 BITTBL:: .WORD 1 ;BIT O SET. 
1436 002536 000002 -WORD 2 sBIT 1 SET. 
1437 002540 000004 -WORD 4 ;BIT 2 SET. 
1438 002542 000010 -WORD 10 ;BIT 3 SET. 
1439 002544 000020 -WORD 20 sBIT 4 SET. 
1440 002546 000040 -WORD 40 sBIT 5S SET. 
1441 002550 000100 -WORD 100 ;BIT 6 SET. 
1442 002552 000200 -WORD 200 sBIT 7 SET. 
1443 002554 000400 -WORD 400 ;BIT 8 SET. 
1444 002556 001000 -WORD 1000 ;BIT 9 SET. 
1445 002560 002000 -WORD 2000 ;BIT 10 SET. 
1446 002562 004000 -WORD 4000 sBIT 11 SET. 
1447 002564 010000 WORD 10000 sBIT 12 SET. 
1448 002566 020000 WORD 20000 sBIT 13 SET. 
1449 002570 040000 WORD 40000 sBIT 14 SET. 
coos 002572 100000 WORD 100000 sOIT 1S SET. 
1 
1452 FRREREREEEEESEEEEAEAEEASEEEEAEEEEEABAAABASESEEAAAEAEERAEAREEAEASAEREAEAEERERES 
1453 :* Table of DUT Baudrates 
1454 jEREREERAEEREEAEEEEAEAAAEAEESEEEEERERAEAAREEEAEESSEEEAEREAAAEALAREESERELEALE LES 
1455 002574 BRTBLB: : sBASE OF DUT BAUD RATE TABLE. 
1456 002574 000062 -WORD 50. sBAUD RATE ENTRY FOR CODE 0. 
1457 002576 000113 -WORD 75. sBAUD RATE ENTRY FOR CODE 1. 
1458 002600 000156 -WORD 110. sBAUD RATE ENTRY FOR CODE 2. 
1459 002602 000206 -WORD 134, sBAUD RATE ENTRY FOR CODE 3. 
1460 002604 000226 -WORD 150. sBAUD RATE ENTRY FOR CODE 4. 
1461 002606 000454 -WORD 300. sBAUD RATE ENTRY FOR CODE 5S. 
1462 002610 001130 -WORD 600. sBAUD RATE ENTRY FOR CODE 6. 
1463 002612 002260 -WORD 1200. sBAUD RATE ENTRY FOR CODE 7. 
1464 002614 003410 -WORD 1800. sBAUD RATE ENTRY FOR CODE 8. 
1465 002616 003720 -WORD 2000. :BAUD RATE ENTRY FOR CODE 9. 


—— 
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1466 002620 004540 
1467 002622 011300 
1468 002624 016040 
1469 002626 022600 
1470 002630 045400 
1471 002632 113000 


1493 002660 000000 


1499 003062 000000 
1500 003064 000000 
1501 003066 000000 


1504 003270 000000 


1509 003272 000000 
1510 003274 000000 
1511 003276 000000 
1512 003300 000000 
1513 003302 000000 
1514 003304 000000 
1515 003306 000000 
1516 003310 000000 


— 








WORD 2400 ;BAUD RATE ENTRY FOR CODE 10. 

WORD 4800 ;BAUD RATE ENTRY FOR CODE 11. 

WORD 7200 ;BAUD RATE ENTRY FOR CODE 12. 

WORD 9600 s;BAUD RATE ENTRY FOR CODE 13. 

WORD 19200 ;BAUD RATE ENTRY FOR CODE 14. 

-WORD 38400 ;BAUD RATE ENTRY FOR CODE 15. 
BRTBLE:: ;LABEL AFTER END OF DUT BAUDRATE TABLE. 
SRRREEEEEREEEEEEEE EEE EE EE EE EE EEEE EE ODEEEEEEEE ES ODEL ODEO DEES ED ED EEEEEEES EEEEEES 
3* GPR Save Areas Zero and One. 
jPEREEEEREEAEREREEEEEE ADEE DEERE EEED EE EEEEEEEE OS ODED ODES OE OEOSODODEEKEEREEEOEEEE 
GPRSOB: : sBASE OF GPR SAVE AREA NUMBER ZERO. 

-WORD O sWORD 1, STORAGE FOR R1. 

-WORD O ;WORD 2, STORAGE FOR R2. 

-WORD O sWORD 3, STORAGE FOR R3. 

-WORD O sWORD 4, STORAGE FOR R4. 

-WORD 0O sWORD 5S, STORAGE FOR RS. 
FERRER AEEEEEEE ES EA EEEE ES ES ES OD OEE EEE ESOS OS OE OOOO ESOS OEE EEEEDEEE ERED EERE EES 
;* Transmission and Reception Varisbles, Pointers, and Flags. 


EREESAEREEEEEEEEEEREEEEEE DESDE EE EEEEEEEEED EEO EEEDREEEEEEEEEEEEEREEEDEEEEEARERES 
CHRTOT:: .WORD 0O sTOTAL RECEIVED CHARACTER COUNTER. 
ERSMRF:: .WORD 0 ;"PRINT ERROR SUMMARY” FLAGS. 
TXDONF:: .WORD 0 ; TRANSMISSION DONE FLAGS. 
RXDONF:: .WORD 0O sRECEPTION DONE FLAGS. 
TXOBLF:: .WORD O ;"TX HAS BEEN DISABLED” FLAG. 
ERAGE EREEEEEEEEEAEEREEE EE EE SEER EEEEEEEEES OE EEEEEEEEEEEEEEEEEEEEEREEDREERERERES 
F Storage area for the BMP code queue. 
ESEREREEEREEEEEEEEEEEE EEE KEES EE EEEEEEEE ED ES EEE EEEEEEEEODEREEEEEEDEEREREEEREEE 
BMPCQP: : -WORD O sPOINTER USED TO ACCESS THE NEXT CELL IN QUE. 
BMPCQB: ; .BLKW 64. sSTORAGE FOR 32 CELLS, TEST@ PLUS BMP CODE. 
BMPCQE: : sLAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 
FRRRREREEEEREESRESEAAEEEEERS SEERA EERASASEEAAEEEAEALEREAAAEREAEAREARELEEAL RE REEDS 
:* Receive Buffer and Associated Variables. 
§ERERRERERESEAEAEAEERAEEREEEEEREAEEEEEEEEEDEESEEEEEEEEEEEEEEEEEEEEEEEEERLRREEES 
RXBOPT:: .WORD 0O 3RX BUFFER OUTPUT POINTER. 
RXBIPT:: .WORD 0O 3RX BUFFER INPUT POINTER. 
RXBCNT:: .WORD O sCOUNT OF NUMBER OF CHARS IN RX BUFFER. 
RXBSTA:: sLABEL AT BEGINNING OF THE RX BUFFER. 

-BLKW RXBFUL sLEAVE ENOUGH ROOM FOR A FULL BUFFER. 
RXBEND:: .WORD 0O ;LABEL AFTER END OF RX BUFFER. 
FRERAEREEEEEEEEEEEEREAEEASEEEREEAEAEAREAEAARESEEAAEEEEEREEMEEAEEEREARELERALERES 


;* TX/RX Control Block. 
jFRREEEEREAAEEEEEEEEEEEEEEREEAEEAAEASESASERASEEEREAADAALERESSESASEAAEALEAREEEEA 
CBB: : sBASE OF TX/RX CONTROL BLOCK. 

CBLPRA:: .WORD 0 sLINE PARAMETER REGISTER CONTENTS. 

CBLNCA:: .WORD 0O sLINE CONTROL REGISTER CONTENTS. 

CBDPAA:: .WORD 0 sSTART ADDRESS OF DATA PATTERN. 

CBOPLA:: .WORD 0O sLENGTH OF DATA PATTERN. 

CBOPNA:: .WORD 0 sNUMBER OF REPEAT TRANSMISSIONS OF THE DATA PATTERN. 
CBMAPA:: .WORD 0 sBIT MAP OF LINES TO INITIALISE. 

CBLPBA:: .WORD 0O sLOOPBACK MODE CAS IN LOPBCK). 

CBOFSA:: .WORD 0 sAMOUNT OF OFFSET BETWEEN EACH TX START. 


ROSSER EAEESESEEAESEAEEEEEASEAEEAEASEAEASEEEEEEASEEEEEEEEEEEEEEEEEEREDEEREREEEEE 
3* Transmission and Reception Tables of Pointers and Counters. 
FRERREEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEREARREEEEEREES 
DPENDB:: .BLKW 16. sTABLE OF END ADDRESSES OF DATA PATTERNS. 
DPLENB:: .BLKW 16. sTABLE OF LENGTH OF DATA PATTERNS FOR LINES. 
EXCNTB:: .BLKW 16. sEXTRA RECEIVED CHARACTER COUNTERS TABLE. 





SEQ 0035 
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1523 003452 ERCNTB:: .BLKW 16. sCHARACTER RECEIVE ERROR COUNTERS TABLE. 

1524 003512 TXPTRB:: .BLKW 16. s TRANSMISSION DATA POINTERS TABLE. 

1525 003552 RXPTRB:: .BLKW 16. sRECEPTION DATA POINTERS TABLE. 

1526 003612 CHCNTB:: .BLKW 16. sNUMBER OF CHARACTERS TO BE TXED AND RXED. 

1527 003652 TXCNTB:: .BLKW 16. s TRANSMISSION CHARACTER COUNTERS TABLE. 

1528 003712 RXCNTB:: .BLKW 16. sRECEPTION CHARACTER QOUNTERS TABLE. 

1529 i PERERA EEEEEEEEEE SEES SEES SEED DEEDES OS 16066006600606000600000000000000000008404 

1530 3 Storage area for the contents of the DUT STAT register states. 

1531 jPESEEEEEESEEEEE SESE EE EE EE EE EDGE OL OEEEEEEE ODED ED OO EE 6606 0000060000004000400040006 

1532 003752 STSTB:: sBASE OF DUT STAT STORAGE TABLE. 

1533 003752 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 0. 

1534 003754 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 1. 

1535 003756 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 2. 

1536 003760 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 3. 

1537 003762 000000 -WORD 0O sSTORAGE FOR STAT REGISTER FOR LINE 4. 

1538 003764 000000 -WORD 0O sSTORAGE FOR STAT REGISTER FOR LINE S. 

1539 003766 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 6. 

1540 003770 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 7. 

1541 003772 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 8. 

1542 003774 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 9. 

1543 003776 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 10. 

1544 004000 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 11. 

1545 004002 000000 -WORD 0 sSTORAGE FOR STAT REGISTER FOR LINE i2. 

1546 004004 000000 -WORD 0O sSTORAGE FOR STAT REGISTER FOR LINE 13. 

1547 004006 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 14. 

1548 004010 000000 -WORD O sSTORAGE FOR STAT REGISTER FOR LINE 15. 

1549 004012 STSTE:: sEND OF DUT STAT STORAGE TABLE. 

1550 Ta chaciathatachateehacatecacatendechanhebe tet LLL LLL LL LTT TT TTT TTT TTT TTT TT TT Tt tT 

1551 8 General table and buffer area--513 words. 

1552 Bashetpehpslathatnshaeacatetashchdedeheeehtte ttt LLL LL LLL LTT PTTL TTT TT TT TTT TTT TTT TTT TTT rte 

1553 004012 BUFBAS: : sBASE OF MEMORY BUFFER. 

1554 004012 ERLTBL:: -BLKW 128. sFIRST HALF OF GENERAL TABLE OR BUFFER. 

1555 004412 BUFMID: : -BLKW 64. sSECOND HALF OF GENERAL TABLE OR BUFFER. 

1556 004612 BUF3QT:: -BLKW 64. sLAST QUARTER OF THE BUFFER AREA. 

1557 005012 BUFEND: : sEND OF GENERAL PURPOSE MEMORY BUFFER. 

1558 005012 ENDETB: : -BLKW 16. sBUFFER OVERFLOW SPACE. 

1559 T chacachatashetnehatetatetttathendetnchene bet th LL LLL LLL TTT TTT TTT TTT TT TTT TTT tT TTT ttt 

1560 3 Table of Date Pattern Resync Queues. 

1561 achedpelpsnthtadhathtetaahtnehdedht end h Lett Lit LL LLL LLL TTT LTT TTT TTT TT TT TTT TTT TTT TTT ttt 

1562 005052 DPRSQB: : sDATA PATTERN RESYNC QUEUES TABLE BASE. 

1563 005052 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 0. 

1564 005062 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 1. 

1565 005072 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 2. 

1566 005102 -BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 3. 

1567 005112 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 4. 

1568 005122 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 5S. 

1569 005132 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 6. 

1570 005142 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 7. 

1571 005152 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 8. 

1572 005162 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 9. 

1573 005172 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 10. 

1574 005202 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 11. 

1575 005212 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE i2. 

1576 005222 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 13. 

1577 005232 -BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 14. 

1578 005242 -BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 15. 

1579 005252 OPRSQE: : sEND OF DATA PATTERN RESYNC QUEUES TABLE. %, 





r-— 
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r-— 


005304 
005305 
005306 
005307 
005310 
005311 
005312 
005313 
005314 
005315 
005316 
005317 
005320 
005321 
005322 
005323 


§ SORES EEEEEE OOS OE 0644060666060 06 6006000004 0000060000 000000 000600 000000000000008 


3 Single Cheracter Mode LPR Field Tables. 
jSSRREEEEEEE SEES ORES EEEEEE EEE OS OE 060440046 0000060000060000000006400000000000088 


SCBCTB: 


sCBCTE:: 
SCNSTB:: 


“.WOPD 30 ;8 BITS/CHAR LPR FIELD. 


. WORD 


SCNSTE:: 
SCTPTB:: 


SCTPTE:: 


FRESE EEEEEE SESE EEEEEEEEEEEDEEEE ES EEEEES 04060666 6000060606666000000046046000408 


; SINGLE CHARACTER DATA PATTERN TABLE. 
adadpelpehstheashactiehadhadadacededahtncnteeecdanteieehidtd tot tL LLL LLL TT TTT TT TTT Tr TTT ttt tt 


en a sSTART OF SINGLE CHARACTER DATA PATTERN TABLE. 
-BY 

-BYTE 10 

-BYTE 17 

-BYTE 63 

-BYTE 74 

-BYTE 125 

-BYTE 177 

-BYTE 200 

-BYTE 252 

-BYTE 303 

-BYTE 314 

-BYTE 360 

-BYTE 367 

-BYTE 376 

-BYTE 377 
SDPEND: : sEND OF SINGLE CHARACTER CATA PATTERN TABLE. 

an 0 sSTART OF FIRST SHORT DATA PATTERN OVERFLOW AREA. 

-BY 1 

-BYTE 10 

-BYTE 17 
§FOOO6 664606606 660606666006 06 06 6060000606000000000600060000000000000040000000008 
; SINGLE CHARACTER DATA PATTERN TABLE NUMBER TWO. 
j POSES EEEEEE SEED EE O6 664006 0666446606 060606 0000060600600006000000000000000000008 
SOP2B:: .BYTE 125 sSTART OF SECOND SHORT DATA PATTERN. 

-BYTE 252 

-BYTE 124 

-BYTE 253 

-BYTE 122 

-BYTE 255 

-BYTE 112 

-BYTE 265 

-BYTE S2 

-BYTE 325 

-BYTE 152 

-BYTE 225 

BYTE 132 

-BYTE 245 

-BYTE 126 

-BYTE 251 



















SEQ 0037 


sBASE OF NUMBER OF BITS PER CHAR FIELDS TABLE. 


sEND OF NUMBER OF BITS/CHAR FIELDS TABLE. 
sBASE OF NUMBER OF STOP BITS FIELDS TABLE. 
0 31 STOP BIT LPR FIELD. 
sEND OF BAUDRATE FIELDS TABLE. 
sBASE OF TYPE OF PARITY FIELDS TABLE. 
40 ;000 "ARITY LPR FIELD. 
sEND OF TYPE OF PARITY FIELDS TABLE. 



























































1638 005324 
1639 005325 


SOP2E: : 
-BYTE 125 
-BYTE 252 
-BYTE 124 
-BYTE 253 
-BYTE 122 
-BYTE 255 
-BYTE 112 
-BYTE 265 
-BYTE S52 
-BYTE 325 
-BYTE 152 
-BYTE 225 
-BYTE 132 
-BYTE 245 
-BYTE 126 
-BYTE 251 

$$66600060000846 


PROTBL::. 


BYTE 


-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-EVEN 


§ 4068666000606 660666666606 0660000060600000600060000000000606600000000000006000006 
s# Table for storage of RX/TX line number associations. 
s# The associations ere stored as line number times 2 for use as offsets 


250. 
170. 
119. 
99. 
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1637 005324 


sEND OF SECOND SHORT DATA PATTERN. 


sSTART OF SECOND SHORT DATA PATTERN OVERFLOW AREA. 


sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 
sDELAY 


34 when accessing a table of words. 


34 NOTE: Do not write @ non-zero value into the upper byte of any entry. 

§ #86 0066606060606066 060600 60000606666066606600600006000000060000000000000000000 
sBASE OF TX/RX LINE NUMBER ASS 
LINE OFFSET F 


TXRXLB: ; 


3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 


$646606 06040606666 06606000060600600600040000064006 £66662686060664000 


H Single cheracter safe proportional deley teble. 
§ SOSEOEE St 46060606 6606600666 0000000006 60000006060000000000000000000000000000000 


IN MILLI SECONDS AT 50 BAUD 
IN MILLI SECONDS AT 75 BAUD 
IN MILLI SECONDS AT 110 BAUD 
IN MILLI SECONDS AT 134.5 BAUD 
IN MILLI SECONDS AT 150 BAUD 
IN MILLI SECONDS AT 300 BAUD 
IN MILLI SECONDS AT 600 BAUD 
IN MILLI SECONDS AT 1200 BAUD 
IN MILLI SECONDS AT 1800 BAUD 
IN MILLI SECONDS AT 2000 BAUD 
IN MILLI SECONDS AT 2400 BAUD 
IN MILLI SECONDS AT 4800 BAUD 
IN MILLI SECONDS AT 7200 BAUD 
IN MILLI SECONDS AT 9600 BAUD 
IN MILLI SECONDS AT 19200 BAUD 
IN MILLI SECONDS AT 38400 BAUD 


LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 
LINE OFFSET 


RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 


OCIATION TABLE. 


Pre OOITKVaw 
MrROr- + + es © wc 
















005416 
1695 005420 
1696 005422 
1697 005424 
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000032 
000034 
000036 


-WORD 26. sTX/RX LINE OFFSET FOR RX/TX LINE 13. 
-WORD 28. sTX/RX LINE OFFSET FOR RX/TX LINE 14. 
-WORD 30. sTX/RX LINE OFFSET FOR RX/TX LINE 15. 
TXRXLE: : sEND OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
EVEN sGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 


$886 6666660660606060606606606600000000600000660000600000000000000000000000000008 
3# Table for storage of RX/TX line number essocietions. 

s# The associations ere stored es line numbers which cen be used es such or 

pe es offsets when eccessing e table of bytes. 

3%e6 SE O66666606666 05 66660666 06060606 660600600000060600000000000000000000000000008 
TXRLNB: : sBASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 


-BYTE 0 sTX/RX LINE FOR RX/TX LINE 0 

-BYTE 1. sTX/RX LINE FOR RX/TX LINE 1. 

-BYTE 2 sTX/RX LINE FOR RX/TX LINE 2. 

-BYTE 3. sTX/RX LINE FOR RX/TX LINE 3. 

-BYTE 4. sTX/RX LINE FOR RX/TX LINE 4. 

-BYTE 5. sTX/RX LINE FOR RX/TX LINE S. 

-BYTE 6. sTX/RX LINE FOR RX/TX LINE 6. 

-BYTE 7. sTX/RX LINE FOR RX/TX LINE 7. 

-BYTE 8. sTX/RX LINE FOR RX/TX LINE 8. 

-BYTE * 9. sTX/RX LINE FOR RX/TX LINE 9. 

-BYTE 10. sTX/RX LINE FOR RX/TX LINE 10. 

BYTE i1. sTX/RX LINE FOR RX/TX LINE 11. 

BYTE i2. sTX/RX LINE FOR RX/TX LINE 12. 

BYTE 13. sTX/RX LINE FOR RX/TX LINE 13. 

BYTE 14. sTX/RX LINE FOR RX/TX LINE 14. 

-BYTE 15. sTX/RX LINE FOR RX/TX LINE 15. 

TXRLNE : : sEND OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

EVEN sGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 


§ O08 66660006606606006606 066606 6000060000000000 05 0060000000000000000000000000008 
s# Table of TX/RX line number essociations in steggered 1 ‘ 

3 The associations ere stored es line number times 2 for use es offsets 

34 when eccessing e table of words. 

s* This is e@ teble of dete for reading — Use to load the above teble. 

3% NOTE: Must convert from BYTEs to WORDs when loading ebove teble. 
§$66606066066606660000060666660006060000060606000000060060000000000000000000008 


STGTRB: : sBASE OF STAGGERED TX/RX LINE NUMBER TABLE. 
-BYTE 4. sTX/RX LINE OFFSET FOR RX/TX LINE 0. 
-BYTE 6. sTX/RX LINE OFFSET FOR RX/TX LINE 1. 
-BYTE 0 sTX/RX LINE OFFSET FOR RX/TX LINE 2. 
-BYTE 2. sTX/RX LINE OFFSET FOR RX/TX LINE 3. 
-BYTE 12. sTX/RX LINE OFFSET FOR RX/TX LINE 4. 
-BYTE 14. sTX/RX LINE OFFSET FOR RX/TX LINE 5S. 
-BYTE 8. sTX/RX LINE OFFSET FOR RX/TX LINE 6. 
-BYTE 10. sTX/RX LINE OFFSET FOR RX/TX LINE 7. 
-BYTE 20. sTX/RX LINE OFFSET FOR RX/TX LINE 8. 
-BYTE 22. sTX/RX LINE OFFSET FOR RX/TX LINE 9. 
BYTE 16. sTX/RX LINE OFFSET FOR RX/TX LINE 10. 
-BYTE 18. sTX/RX LINE OFFSET FOR RX/TX LINE 11. 
-BYTE 28. sTX/RX LINE OFFSET FOR RX/TX LINE 12. 
BYTE 30. sTX/RX LINE OFFSET FOR RX/TX LINE 13. 
-BYTE 24. sTX/RX LINE OFFSET FOR RA/TX LINE 14. 
-BYTE 26. sTX/RX LINE OFFSET FOR RX/TX LINE 15. 
-EVEN sGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 


LSERRTBL:: 
ERRTYP:: -WORD O 





-- 





SS |S 
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005466 000000 ERRNBR: : -WORD 0 
095470 000000 ERRMSG: : -WORD 0 
. 005472 000000 ERRBLK:: -WORD 0 
1761 
1762 -EVEN 





SEQ 0040 
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SEQ 0041 


1764 -SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 

1765 FOSSA ESESEESEEKESEEERESEEEEESEREREEEEOREEEEOEDDEEEEEEODEDEDEEEDODEEOEERED EOE 
1766 3@ There ere 4 routines and macro definitions used for the handling of 
1767 3¢ GPR values during subroutine calls within this program. The four 
1768 ;* routines/macro calls have the following names: 

1769 36 

1770 34 SAVE - Macro definition used at the beginning of @ subroutine to 
1771 34 save the GPR contents for leter restoration. 

1772 34 PASS - Macro definition used at the end of a subroutine to restore 
1773 ;¢ the previously saved GPR contents and to leave the contents 
1774 34 of the specified GPR(s) intact (NOT restored). 

1775 3¢ PREGOS - Subroutine which is called from the SAVE and PASS macro 
pa ie expansions which actually performs the actions on the GPRs. 
1777 34 

1778 34 During a subroutine which uses these GPR save routines the values 
1779 3 of the GPRs are stored on the stack in the following stack frame: 
1780 38 

1781 34 SP -> RET PC INTO PREGOS ROUTINE. 

1782 34 SP+2 -> GPR RO CONTENTS. 

1783 3* SP+4 -> GPR Ri CONTENTS. 

1784 34 SP+6 -> GPR R2 CONTENTS. 

1785 3¢ SP+8 -> GPR R3 CONTENTS. 

1786 34 SP+10 -> GPR R4& CONTENTS. 

1787 34 SP+12 -> GPR RS CONTENTS. 

1788 3* SP+14 -> RET PC INTO CALLER OF SUB‘ TNE WHICH CALLED . 25605. 
1789 ;* 

1790 :* Each level of sub'tne calling uses 8 words of stack overhead. 

1791 34 The SAVE and PASS macros can also be used in “straight line code” 
1792 34 to save and restore the GPR values. Im any case, after the 

1793 34 issuing of a PASS call the GPRs will be restored to the values 

1794 74 they had prior to the last SAVE call (except for the excepted, 

1795 :* or passed intact, GPRs specified as parameters to the PASS call) 
1796 34 end the SP will also be restored to its condition before the last 
1797 3* SAVE call. The programmer must be sure that the SP has the same 
1798 ie value when the PASS macro is called as it had immediately after 
1799 3* the SAVE macro was called. 

1800 FRORHEESEEEEEEAEEESESAAAAREEEAEEEASEAEAREEAAEREAER CHEAKEAREEARERAARERELALEEALES 


-— 








CVDHEBO DHV11-M TEST, ORION UFD MACRO Y0S.02 Wednesday 08-May-85 10:16 Page 32 
GPR FRAME ACCESS EQUATES 





oes -SBTTL GPR FRAME ACCESS EQUATES 

i yeoe 

1804 sEquates that allow access to the stack frame. These ere the 
1805 soffsets into the stack for registers saved during the PREGOS 
1806 sroutine. 

1807 gece 

1808 

1809 000036 LPCSLT== 36 sOffset for lest return PC. 

1810 000016 PCSLOT== 16 :Offset for return PC 

1811 000014 RSSLOT== 14 :Offset for R5. 

18i2 000012 R4SLOT== 12 :Offset for R4. 

1813 000010 R3SLOT== 10 :0ffset for R3. 

1814 000006 R2SLOT== 6 sOffset for R2. 

1615 000004 R1SLOT== 4 ;Offset for R1. 

1816 000002 ROSLOT== 2 ;Offset for RO. 
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SEQ 0043 
GLOBAL MACRO DEFINITION - SAVE - 
1818 -SBTTL GLOBAL MACRO DEFINITION - SAVE - 
1819 FSSOAEAEEEEESEEEHEEEEEEAESEEESSEEEEAEEERESEESEEEAEEEREEEEEEEEEEEEDEEEEEEEREEERE 
1820 74 This macro is used at the beginning of a subroutine to save the 
1821 3* contents of the GPRs RO thru R5. 
1822 3* 
1823 3@ INPUTS: SP - Unchanged since subroutine was entered 
soos 3% RSSLOT - Offset to stack slot for R5 (Equated to 14 Octal) 
fe 
1826 3# OUTPUTS: GPR save area on the stack is loaded with the contents of GPRs 
pod 3* TOP OF STACK - Loaded with the return address into PREGOS 
3* 
1829 3# CALLING SEQUENCE: SAVE 
1830 38 
1831 3* COMMENTS: No arguments are allowed. 
— 34 The PASS macro should be called to restore the GPR values. 
;* 
1834 3* SUBORDINATE ROUTINES CALLED: PREGOS. 
1835 FPRREREEEEEAEEEAEAEEEEEEESEAEESAEEEEEEEAAAAAEAAAEASEAEAEEEEEREEEEEAR DALE RAEEEES 
1836 
1837 -MACRO SAVE 
1838 -LIST 
1839 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
1840 -NLIST 
1841 -ENDM SAVE 


—— 
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SEQ 0044 
GLOBAL MACRO DEFINITION - PASS - 
1843 -SBTTL GLOBAL MACRO DEFINITION - PASS - 
1844 FPRRREEEEE SEEDER EEEEEEEEEE EE OE OEEEEEOEEEEEEEODEEEEODOD OE OD OS 4OO6404000000000006 
1845 34 This macro is used in conjunction with the SAVE macro. It is 
1846 34 called at end of a subroutine to pass parameters in GPRs back to the 
1847 pe calling routine by altering the GPR save area on the stack and then 
pees 34 returning to PREGOS to restore the GPRs to their saved values. 
3* 
1850 3* INPUTS: Only allowed ARGUMENTS ere “RO” thru “RS”. 
1851 34 ROSLOT thru RSSLOT must be equated to their respective GPR save 
res ;* slot offsets before calling this macro. 
3% 
a. 3;# OUTPUTS: The GPR values are put in their respective slots on the stack. 
34 
pes ;* CALLING SEQUENCE: PASS RO,R1,... 
1 3* 
1858 3* COMMENTS: Any combination of GPR arguments may be listed in any order. 
1859 3* For example, the following are legal: 
1860 34 PASS Ri 
1861 3* PASS R4,RO,R2 
1862 34 The GPRs listed as arguments will be passed intact to the 
1863 :* calling routine, all other GPRs will be restored. 
et ;* The SP must be at its original value when PASS is called. 
3* 
1866 34 The macro cell 
1867 34 PASS RO.R3 
1868 3* expands into the following assembly code: 
1869 i* MOV RO,ROSLOTC(SP ) sPUT RO IN STACK SLOT. 
1870 3% MOV R3,R3SLOTC( SP) 3PUT R3 IN STACK SLOT. 
1871 34 JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
1872 ;* In this example GPRs Ri, R2, R4, and R5 will be restored to 
1873 3* their values contained in the stack frame and RO and R3 
phe: ;* will be left at their values prior to this PASS cell. 
3* 
1876 s# SUBORDINATE ROUTINES CALLED: (PREGRT - Label within PREGOS, value on stack.) 
1877 FEROOERESEEEAEEAEEEEEAEREEEAEEAEEAEEEASEAEEREREAEEEEEE DEEDES EEEEEEEEREDDE EERE EES 
1878 
1879 -MACRO PASS A,B.C,D,E,F 
1880 . IRP X,<A,B,C,0,E,F> 
1881 PY NB , X 
1882 «LIST 
1883 MOV X,X' SLOTC(SP) ;PUT X IN STACK SLOT. 
1884 -NLIST 
1885 .ENDC 
1886 .ENDM 
1887 -LIST 
1888 JSR PC,8(SP)+ sRETURN TO PREGOS SUBRT. 
1889 -NLIST 
1890 .ENDM PASS 


i ae 
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SEQ 0045 
GLOBAL SUBROUTINE - PREGOS - 
1892 -SBTTL GLOBAL SUBROUTINE - PREGOS - 
1893 jPESREEEEEEE SEES EEE EE EEEEEE DE EEED EEE EE OOOO ODO OO 06 060000000000000000000800008 
oes 34 Preserve Registers RO through R5 for subroutine cells. 
7s 
1896 3# INPUTS: The return address back into the calli routine must be in 
odd 34 GPR RS. Ci.e.- Macros use “JSR RS,PREGOS”.) 
3* 
peed 3* OUTPUTS: Registers RO through R5 ere saved on the stack. 
3* 
1901 s#CALLING SEQUENCE: SAVE sMacro expansion calls PREGOS. 
1902 34 [Subroutine code]... 
soos 34 PASS sMacro expansion recalls PREGOS. 
3% 
1905 ;*COMMENTS: This routine is re-entrant. 
1906 34 
1907 3% Parameters may be passed out of a subroutine by modifying the 
1908 3* register save area on the stack. Use the PASS GPRn macro 
1909 3* to return GPR values intact. 
1910 34 Use the RnSLOT offsets from the SP to pass other parameters. 
1911 3* (Exemple: MOV VALUE, ROSLOT(SP) ] 
rock i* Make sure the SP is at its original value when you do this. 
;* 
1914 +*SUBORDINATE ROUTINES CALLED: None. 
1915 jPORARAEAEEE EASA EEEEEE DEES EEE LEED EE EEDE ES EES ODED ODES EEE OD OE EEEEEDEEDEEEEEEES 
1916 
1917 005474 PREGOS: #RS HAS BEEN LOACED ON THE STACK BY THE SUBROUTINE CALL 
1918 005474 010446 MOV R4,-(SP) sSAVE R4 
1919 005476 010346 MOV R3,-CSP) sSAVE R3 
1220 005500 010246 MOV R2,-(SP) ;SAVE R2 
1921 005502 010146 MOV R1,-CSP) sSAVE R1 
1922 005504 010046 MOV RO, -C(SP) sSAVE RO 
1923 005506 010546 MOV RS,-CSP) sPUSH RETURN PC ON TOP OF STACK 
1924 005510 016605 000014 v RSSLOT(SP),.RS sRESTORE RS TO VALUE IT HAD BEFORE CALLS 
1925 eae 7B. 
1926 005514 004736 PC ,@(SP)+ iCall the subroutine at the return address 
1927 sfrom the PREGOS call, putting the present 
1928 sPC on the stack as a return address into 
1929 sthis (PREGOS) routine. 
1930 
1931 see 
1932 iThe following code is executed when the calling routine does a 
— ;"return” (J PC,@(SP)+] using the PC deposited on the stack above. 
jc? 
1935 
1936 005516 012605 PREGRT:: MOV (SP)+,R5 sPut return PC in RS. 
1937 005520 012600 MOV (SP)+,RO sRestore RO. 
1938 005522 012601 MOV (SP)+,R1 sRestore R1. 
1939 005524 012602 MOV (SP)+,R2 Restore R2. 
1940 005526 012603 MOV (SP)+,R3 isRestore R3. 
foak 005530 012604 MOV CSP)+,R4 sRestore R4. 
1943 005532 000205 RTS R5 sReturn to the subroutine which called PREGOS. 
1944 irestoring R5 in the process. 


-— 
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FD/ 


-— 


1976 
1977 
1984 


104 
061 
115 


110 
061 
000 


126 
055 








SEQ 0046 


-SBTTL GLOBAL TEXT SECTION 
had tad aiadaiabaiabaialnialsialsinisiaisinisinlsinininininininisinininininininianinnmnuananucacrcncc PEP 


: 
; FVTSKL1.P11 


; Leda ahataealalabatalalalainhaiaiaialsinininininininisisininininisisininisisiniginininutesiscnaiscinmti ET 
34 
; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
s MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
s MORE THAN ONE TEST. 
i-- 
i 
; NAMES OF DEVICES SUPPORTED BY PROGRAM 
Q 
DEVTYP <DHV11-M> 





LS$DVTYP:: 
-ASCIZ sDHV11-Ms 
-EVEN 
; TEST DESCRIPTION 
. 
DESCRIPT <DHV11 TEST, ORION UFD> 
L$DESC:: 
-ASCIZ /DOHV1i1 TEST, ORION U 
-EVEN 
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SEQ 0047 


1987 haladadatahatatatataialaialaialaiataialsigisigiginigininintaiateinisiainainininainainisinininminaincmiccicceccr CPE 


a 
1989 ; VOHE . FMT 
: 
+h hadadatabaiahalalatalniaiatnlaislniniaiainininininsininininisininisinisisinninnuiiuuuuuiuiiiit ttt tt RTL RRR TEN 


1996 ; FORMAT STATEMENTS USED IN PRINT CALLS 
1997 3 


r-— 








CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 38 


SEQ 0048 
GLOBAL TEXT SECTION 
2019 
oor hah atadatatatataialalalaialatataiaieinisininininiainiaigisininisinininininiainaisisiniginnnmnnnaccicceccccr EEE 
021 F 
oe | F VOHE .MSG 
’ 
2024 hadatadatatatatatataialaialaialalatataisininininininiiniainiatsiaisinininininiaisiniaisuieminnincnameccc PEE 
oe 
2025 
2026 
2027 -NLIST BIN 
2028 -SBTTL GLOBAL MESSAGE AREA 


2029 ; *#eeeeeee FORMAT STATEMENTS *¢ee0ee000 
2030 005572 MFUNIT:: .ASCIZ /sNSA TESTING UNIT :8D48A(D)N/ 
2031 005630 EFOS03:: .ASCIZ /sTsSN/ 
2032 005635 EFOSOS:: .ASCIZ /#A SD58A ILLEGAL INTERRUPTS RECEIVED.sN/ 
2033 005710 EF1401:: .ASCIZ /sNSA ROM VERSION NUMBERS: PROC_1 = #SD2sA(D) PROC_2 = sD2sA(D)sN/ 
2034 006012 EF1402:: .ASCIZ /ST#SA ROM VERSION NUMBER sSTSN/ 
2035 006047 EF1601:: .ASCIZ /SA TSA ABORTED sN/ 
2036 006073 EF1602:: .ASCIZ /sA EXPECTED DATA: 068A (0). SN/ 
2037 006135 EF1603:: .ASCIZ /sA ACTUAL DATA: S068A (0).8N/ 
2038 006177 EF1604:: .ASCIZ /#A BAD BIT(S) IN DEVICE STA REGISTER FOR LINE #D2s8A (D).sN/ 
2039 006274 EF3001:: .ASCIZ /#A EXPECTED OR CORRECT VALUE: #03sN/ 
2040 006343 EF3002:: .ASCIZ /#A ACTUAL OR MEASURED VALUE: #03sN/ 
2041 006412 EF4401:: .ASCII /sNSA DMA ADDRESS TEST SUCCESSFUL, BITS 0 TO SD2s8A (D) TESTED/ 
2042 006506 -ASCIZ / (#028A BITS).SN/ 
eA SD28A(D).SN/ 


2043 006527 EF6401:: .ASCIZ / 
2044 006604 EF7801:: .ASCIZ /STSA ON LINE #D28A DECIMAL. SN/ 

2045 006642 EF8401:: .ASCIZ /#A sTSA FOR LINE *D28A(D) AFFECTS OTHER MODEM SIGNALS. SN/ 

2046 006734 EF8402:: .ASCII /#A CHANGING TSA FOR LINE sD2sA(D) AFFECTED / 

2047 007017 -ASCIZ /ST#A FOR LINE SD28A(D).9N/ 

2048 007051 EF9001:: .ASCIZ /SA UNEXPECTED STA FOUND IN RECEIVE CHAR FIFO: 8N/ 

2049 007133 EF9002:: .ASCIZ /#A CODE IS ASSOCIATED WITH LINE: #D2sA(D)sN/ 

2050 007212 EF9003:: .ASCIZ /#A CODE IS: #038A(0)sN/ 

2051 007246 EF9004:: .ASCIZ /#A STSA VALUE: #038A(0)sSN/ 

2052 007303 €EF9005:: .ASCIZ /#A STSA VALUE: NONESN/ 

2053 007334 EF9006:: .ASCIZ /SA TSA SD28A(D)SN/ 

2054 007360 EF9007:: .ASCIZ /#A CHARACTER RECEIVED WITH ERROR FLAG(S) SET ON LINE sD2sN/ 
2055 007454 €EF9008:: .ASCIZ /#A CHARACTER READ AS: #03sN/ 

2056 007513 EF9009:: .ASCIZ /#A STA ERROR FLAG SET.SN/ 

2057 007552 EF9010:: .ASCIZ /#A NUMBER OF ERRORS DETECTED ON LINE sD2sA(D) IS sDSSA(D)sN/ 
2058 007651 EF9012:: .ASCII /#A LINESD26A ONLY STSDSSA BYTES OF SDSSA BYTE/ 

2059 007725 -ASCIZ / DATA PAT'N TX‘'D FROM LINESD2sN/ 

2060 007765 €F9013:: .ASCIZ /#A DATA PATTERN NOT COMPLETELY sTSN/ 

2061 010032 EF9016:: .ASCIZ /A UNEXPECTED TSA FOR LINE SD2sA(D) IN FIFO AFTER RESET: SN/ 
2062 010127 EF9017:: .ASCIZ /#A STA CWITH ERROR FLAGS) IS s068A(0)SN/ 

2063 010203 EF9018:: .ASCII /SA TSA IN SELFTEST CODE FIFO SLOT FOR LINE #D2/ 

2064 010263 -ASCIZ /#A(D) AFTER RESET.N/ 

2065 010310 EF9019:: .ASCIZ /SA STSA S068A(0)SN/ 

2066 010334 EF9020:: .ASCIZ /sA TOO FEW TX.ACTIONS GENERATED ON LINE #D2ssN/ 

2067 010415 EF9101:: .ASCIZ /sN/ 

2068 010420 EF9103:: .ASCIZ /#A ERROR CONDITION ON LINE sD2sN/ 

2069 010466 EF9301:: .ASCIZ /SA STSD2KA(D), BMP CODE REPORTED :s038A(0)sN/ 

2070 019544 EF9302:: .ASCIZ /SA OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE)sN/ 


2072 peeeeeeaeeeee MESSAGE AREA seeeeeaecane 
2073 010644 ‘DROOMG:: .ASCIZ /CSR/ 
2074 010650 DRO2MG:: .ASCIZ /RBUF/ 
2075 010655 DRO4MG:: .ASCIZ /LPR/ 


-— 
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2076 
2077 


010661 


015160 


DRO6GMG:: .ASCIZ 
DRiOMG:: .ASCIZ 
OR12MG:: .ASCIZ 
DR14MG:: .ASCIZ 
OR16MG:: .ASCIZ 
EM0103:: .ASCIZ 
EMO201:: .ASCIZ 
EMO202:: .ASCIZ 

. ASCIZ 
EMO0203:: .ASCIZ 

. ASCIZ 
EM0204:: .ASCIZ 

. ASCIZ 
EM0301:: .ASCIZ 
EMO0302:: .ASCIZ 

.ASCIZ 
EMO0303:: .ASCIZ 

-ASCIZ 
EMO0401:: .ASCIZ 
EM0402:: .ASCIZ 

. ASCIZ 
EMOS501:: .ASCIZ 
EmMO502:: .ASCIZ 

-ASCIZ 
EMOS09:: .ASCIZ 
EM05S25:: .ASCIZ 
EM0S26:: .ASCIZ 
EMO0601:: .ASCIZ 
EM0602:: .ASCIZ 

. ASCIZ 
EM0603:: .ASCIZ 

. ASCIZ 
EMO701:: .ASCIZ 
EMO702:: .ASCIZ 

- ASCIZ 
—MO703:: .ASCIZ 

.ASCIZ 
EM0801:: .ASCIZ 
EMO802:: .ASCIZ 
EMO901:: .ASCIZ 
EM0902:: .ASCIZ 
EM1001:: .ASCIZ 
—M1002:: .ASCIZ 
EM1003:: .ASCIZ 
EM1101:: .ASCIZ 
EM1201:7 .ASCIZ 
EM1202:: .ASCIZ 
EM1203:: .ASCIZ 
EM1204:: .ASCIZ 
—M1205:: .ASCIZ 
EM1301:: .ASCIZ 
EM1302:: .ASCIZ 
EM1401:: .ASCIZ 
EM1402:: .ASCIZ 
EM1403:: .ASCIZ 
EM1404:: .ASCIZ 
EM1405:: .ASCIZ 





/STAT/ 

/LNCTRL/ 

/TBUFFADI/ 

/TBUFF AD2/ 

/TBUFFCT/ 

/DEVICE REGISTER ACCESS ERRORS/ 

/MASTER RESET (PERFORM SELFTEST) TEST / 

/ WASTER RESET BIT DID NOT CLEAR AFTER BOARD RESET. / 

/ WAITED S SECONDS. BIT DEFECTIVE OR FIRMWARE HUNG./ 

/ WASTER RESET BIT CLEAR IMMEDIATELY AFTER BOARD RESET. / 
/ BIT DEFECTIVE OR BOARD FIRMWARE ERROR. / 

\ MR BIT WENT CLEAR WITHIN 1/2 SECOND OF BOARD RESET. \ 

/ BIT DEFECTIVE OR SELFTEST WAS (INCORRECTLY) SKIPPED./ 
/MASTER RESET (SKIP SELFTEST) TEST / 

7 WR BIT CLR WITHIN 10 MILISECOND AFTER BOARD RESET. / 

/ BIT DEFECTIVE OR BOARD FIRMWARE ERROR. / 

\ MR BIT WENT CLEAR 1/5 TO 5 SECONDS AFTER RESET.\ 

/ SELFTEST DID NOT GET SKIPPED (SHOULD HAVE BEEN SKIPPED)./ 
/RBUF REGISTER RX CHARACTER FIELD TEST / 

/ IMPROPER CODE FOUND IN RX FIFO AFTER DUT RESET./ 

/ EXPECTED: SELFTEST CODE, ACTUAL: IMPROPER CODE. / 
/RBUF REGISTER ERROR FLAGS FIELD TEST / 

7 RX ERROR FLAG(S) FOUND CLEAR ON SELFTEST CODE./ 

OF eis ALL ERROR FLAGS SET, ACTUAL: FLAG(S) CLEAR./ 
/ RX INTERRUPT(S) RECEIVED WITH RX INTERRUPTS DISABLED. / 
/ TX INTERRUPT(S) RECEIVED WITH TX INTERRUPTS DISABLED. / 
/CSR RX.DATA.AVAIL BIT TEST / 

/ RX.DATA.AVAIL BIT FOUND CLEAR AFTER RESET COMPLETION. / 
/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 
/ RX.DATA.AVAIL BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.A BIT CLEARING./ 
/RBUF RX.DATA.VALID BIT TEST / 

/ RX.DATA.VALID BIT FOUND CLEAR AFTER RESET COMPLETION. / 
/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 
/ RX.DATA.VALID BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.V BIT CLEARING./ 
/RBUF RX.LINE.NUMBER FIELD TEST / 

/_ LINE NUMBER IS WRONG ON A SELFTEST CODE./ 

/CHECK FOR BMP_CODES TEST/ 

/UNEXPECTED BMP CODES FOUND. / 

/DIAGNOSTIC FAIL (SKP SELFTEST) TEST/ 

/ SKIP SELF-TEST TOOK TOO LONG TO COMPLETE, > 50 MS./ 

/ SKIP SELF-TEST COMPLETED TOO SOON, < 10 MS./ 

/SKIP SELF-TEST TEST/ 

/SELF-TEST TEST/ 

/ SELF-TEST TOOK TOO LONG TO COMPLETE, >» 3 SECONDS./ 

\ SELF-TEST COMPLETED TOO SOON, < 1/2 SECOND.\ 

/ SELF-TEST DID NOT EXECUTE/ 

/ OIAG_FAIL BIT BAD/ 

/FAIL SELF-TEST TEST/ 

/ SELF-TEST ERROR REPORTING BAD/ 

/ROM VERSION_NUMBER TEST/ 

/ FIFO EMPTY, ONE OR MORE ROM VERSION_NUMBERS MISSING/ 

/ ROM VERSION_NUMBER FOUND OUT OF SEQUENCE/ 

/ ag ane ROM VERSION_NUMBERS MISSING/ 

/ =! 


SEQ 0049 





CVOHEBO DHV11-M TEST, ORION UFD 


GLOBAL MESSAGE AREA 


— 


2133 
2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 
2158 
2159 
2160 


015173 
015206 
015220 
015226 


EM1406:: 


-ASCIZ 
EM1407:: . 
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/ PROC_2/ 


/TIMEQUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 
\DEVICE REGISTER WORD READ/WRITE TEST \ 

\DEVICE REGISTER WORD READ/MODIFY/WRITE TEST \ 

\DEVICE REGISTER BYTE READ/WRITE TEST \ 

NDEVICE REGISTER BYTE READ/MODIFY/WRITE TEST \ 

/DEVICE STAT REGISTER ID BIT TEST / 

/ID BIT BAD. EXPECTED: CLEAR, ACTUAL: SET./ 
\NO_TX_DATA_VALID/NO TX_ACTION TEST\ 

/__TX_ACTION FOUND AFTER INVALID DATA WORD WRITTEN TO LINE: / 
\TX_DATA_VALID/TX_ACTION TEST\ 

/ NO TX_ACTION FOUND AFTER VALID DATA WORD TX‘D ON LINE: / 


/ INCORRECT LINE NUMBER FOUND WITH TX_ACT AFTER DATA TX‘D ON LINE : 


/TX_ENABLE CINACTIVE) BIT TEST/ 

/_ TX_ENABLE BIT BAD ON LINE: / 

/TX_ENABLE (ACTIVE) BIT TEST/ 

/RECEIVE INTERRUPT TEST / 

/ NO RX INT GENERATED (DATA_VALID SET, RX INTS ENABLED)./ 

/ WO RX INT GENERATED (NO CODES IN FIFO AFTER RESET)./ 

/ NO RX_INT GENERATED (RX_DATA_AVAIL CLR, RX INTS ENABLED)./ 
/__RX INTERRUPT GENERATED WITH RX_DATA_AVAIL CLEAR./ 
/TRANSMIT INTERRUPT TEST ERROR: / 

/ TX_ACTION SET REPEATEDLY AFTER BOARD RESET, NO DATA SENT. / 
/ TX_ACTION STUCK SET AFTER BOARD RESET./ 

/ TX INTERRUPT GENERATED WITH TX_ACTION CLEAR./ 

/ NO TX INTERRUPT WITH TX_ACTION SET AND TX INTS ENABLED. / 
/__TX_ACTION NOT SET AFTER CHARS SENT ON ALL LINES./ 
INTERRUPT BR LEVEL TEST / 

/ NO RX_DATA_AVAIL FROM SELFTEST CODES IN FIFO AFTER RESET./ 
/ 1X INTERRUPT GENERATED AT WRONG BR LEVEL: / 

/ RX INTERRUPT GENERATED AT WRONG BR LEVEL: / 

/ _TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT./ 
/OIAGNOSTIC FIELD (BMP) TEST/ 

/ DIAGNOSTIC FIELD BAD ON LINE: / 

/OMA_START BIT TEST/ 

/OMA_START BIT BAD ON LINE: / 

/DMA_ABORT BIT TEST/ 

/DMA_ABORT BIT BAD ON LINE: / 

/OMA_START BIT FOUND SET AFTER DMA ABORTED ON LINE: / 

/DMA ADDRESS TEST / 

/NO SUITABLE ADDR FOUND, TEST ABANDONED/ 

/*sHOST FAILURE*s; WRITE FAILED TO AN ADDR WHICH HAD BEEN READ/ 
/NO ACTIVE LINES,TEST ABANDONED/ 

/OMA_START BIT FOUND SET BEFORE DMA INITIATED, TEST ABANDONED/ 
/TIME-OUT OCCCURED WAITING FOR DMA TO FINISH/ 

/TOO FEW CHARACTERS FOUND IN THE RXFIFO,OMA FAILED/ 

/TOO MANY BMP CODES FOUND IN RXFIFO/ 

/BAD BITS BETWEEN BITS O AND / 

/RXFIFQO FAILED TO PURGE/ 

/*sHOST FAILURE*sWRITE ATTEMPT FAILED/ 

/IAUTO CINACTIVE) TEST/ 

/IAUTO BIT FOUND SET OM LINE: / 

/IAUTO BIT BAD ON LINE: / 

IAUTO CACTIVE) TEST/ 

/IAUTO BIT FOUND CLR ON LINE: / 


SEQ 0050 
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2190 021403 EMS301:: .ASCIZ /FIFO VALID DATA TEST/ 

2191 021430 EMS302:: .ASCIZ /FIFO BAD DATA FIELD CORRUPTED, TEST USED LINE:/ 
2192 021507 EMS303:: .ASCIZ /BMP CODE FOUND IN FIFO, TEST INVAILDATED/ 

2193 021560 EMS401:: .ASCIZ \FIFO 3/4 ALARM (INACTIVE) TEST\ 

2194 021617 EMS402:: .ASCIZ /FIFO BAD, ALARM SIGNAL DEFECTIVE/ 

2195 021660 EMSSO1:: .ASCIZ \FIFO 3/4 ALARM (ACTIVE) TEST\ 

2196 021715 EMS601:: .ASCIZ \FIFO 3/4 ALARM (ACTIVE/INACTIVE) TEST\ 

2197 021763 EMS701:: .ASCIZ \FIFO 1/2 LEVEL C(ACTIVE/INACTIVE) TEST\ 

2198 022031 EM6401:: .ASCIZ /BREAK GENERATION TEST / 

2199 022060 EM6402:: .ASCIZ / BREAK NOT RECEIVED ON LINE(S):/ 

2200 022121 EM6601:: .ASCIZ /NO OVERRUN ERROR TEST/ 

2201 022147 EM6602:: .ASCIZ / OVERRUN ERROR REPORTED WHEN NONE FORCED/ 

2202 022221 EM6701:: .ASCIZ /OVERRUN ERROR TEST/ 

2203 022244 EM6702:: .ASCIZ / NO OVERRURN ERROR REPORTED, OVERRUN FORCED/ 
2204 022321 EM9001:: .ASCIZ /SINGLE CHARACTER MODE TEST / 

2205 022355 EM9003:: .ASCIZ /MODEM STATUS CODE/ 

2206 022377 EM9004:: .ASCIZ /SELFTEST CODE/ 

2207 022415 €M9006:: .ASCIZ /CHARACTER RECEIVED ON INACTIVE LINE, LINE:/ 

2208 022470 EM9007:: .ASCIZ /UNEXPECTED CHAR RECEIVED AFTER RX COMPLETE ON LINE/ 
2209 022553 EM9008:: .ASCIZ /RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE/ 
2210 022634 EM9009:: .ASCIZ /EXPECTED OR CORRECT/ 

2211 022660 €M9010:: .ASCIZ /ACTUAL OR MEASURED / 

2212 022704 EM9011 ASCIZ /OVERRUN/ 

2213 022714 &M9012 ASCIZ /FRAMING/ 

2214 022724 EM9013 ASCIZ /PARITY/ 

2215 022733 &M9014 ASCIZ /SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:/ 
2216 023027 E&M9015 ASCIZ /TRANSMITTED/ 

2217 023043 &M9016 ASCIZ /RECV'D/ 

2218 023052 &M9017 ASCII / FIFO WILL NOT PURGE (DATA.VALID STUCK SET),/ 
2219 023127 ASCIZ / REMAINDER OF TEST SKIPPED. / 

2220 023163 EM9018:: .ASCIZ /NO CODE/ 

2221 023173 &M9019 ASCIZ /NON-SELFTEST/ 

2222 023210 EM9020:: .ASCIZ /SELFTEST ERROR CODE/ 

2223 023234 EM9022 ASCIZ /DATA CHARACTER/ 

2224 025253 EM9023:: .ASCIZ /MODEM STATUS CODE/ 

2225 023275 EM9024 ASCIZ /SELFTEST CODE/ 

2226 0235513 EM9025:: .ASCIZ /MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED./ 
2227 023407 EM9026:: .ASCIZ / LPR CONTENTS: / 

2228 023433 EM9027:: .ASCIZ /EXTRA CHAR RECEIVED WITHIN DATA PATTERN ON LINE/ 
2229 023513 EM9028 ASCIZ /SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE/ 
2230 023572 EM9030 ASCIZ /A (NO TX COMPLETION INTERRUPTS RECEIVED )sN/ 
2231 023647 €M9101:: .ASCIZ /DMA TRANSMISSION MODE TEST / 

2232 023703 EM9102:: .ASCIZ /DMA_START BIT SET AFTER RESET OR TX.ACTION ON LINE(S):/ 
2233 023772 EM9104:: .ASCIZ / UNEXPECTED DATA FOUND IN FIFO FROM LINE: / 
2234 024046 EM9301 ASCIZ /BMP CODE REPORT/ 

2235 024066 EM9302:: .ASCIZ /BMP CODE FOUND IN TEST / 

2236 024116 EM9303:: .ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST / 

4 024163 &M9304:: .ASCIZ /UNEXPECTED BMP CODES FOUND DURING THIS PASS/ 
2239 -EVEN 

2240 -LIST BIN 
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; FVTSKL2.P11 


2246 8 
2247 had atahatalatadatataiaiaialaiadetalnialataleiniainiainiataeinisininisiaisiisiniaiaisismaeaaucmccucc ccc CCC ern 







2251 -SBTTL GLOBAL ERROR REPORT SECTION 





2253 soe 
2254 s THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

2255 s USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
2256 s (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 


2257 he 
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2282 024240 

024240 
2283 024240 
024240 


024244 
024250 
024252 
024252 
024256 
024262 
024264 
024266 
024272 
024276 
024300 
024300 
024304 
024310 
024312 
024314 
024320 
024320 
024324 
024330 
024332 
024334 
024340 
024340 
024342 
024342 
024342 
2294 

2295 024344 


2291 


2292 
2293 





004537 


032705 
001410 


012746 
012746 
010600 
104414 
062706 
032705 
001410 


012746 
012746 
010600 
104414 
062706 
012746 
012746 
010600 
104415 
062706 


004736 


104423 
045 





LS oN eerie 


- EROIO1 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ERO101 - 





ye This is en error reporting subroutine which prints edditionel error 
3¢ informetion if en error is detected in TEST 1 peed Address 

36 Access Test). This subroutine reports the type of access (Read or 
36 Write or both) which ceused e bus time-out trep (004 trap). 

3¢ A message indiceting thet the DHV11-M may be at the wrong Q-bus address 
3¢ is also printed. 

34 

3@ INPUTS: RS - Error fleg word. 

ig If bit 0 is set, a read error occured. 

34 If bit 1 is set, a write error occured. 

34 

3@ OUTPUTS: Messages are printed at the operator console. 

3* 

:@ CALLING SEQUENCE: Include the label “ERO101” as the message pointer 
34 perameter in the DRS error report macro call. 

3¢ 

3@ COMMENTS: 

34% 

3 SUBORDINATE ROUTINES USED: None. 


§ 90866 666666660666606660060 66046 666660060660066006046600004606606 0600 06004004066 0400008 


BGNMSG €R0101 


ERO101:: 
SAVE sSAVE THE GPR CONTENTS. 
005474 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
000001 BIT @BITO,RS sTEST FOR READ ERROR. 
BEQ 2$ sSKIP READ ERROR MSG IF NO READ ERROR. 
PRINTB #@MSG1 sPRINT READ ERROR MESSAGE. 
024344 MOV @MSG1, -( SP) 
000001 MOV #1,-(SP) 
MOV SP ,RO 
TRAP CSPNTB 
000004 ADD #4,SP 
000002 2s: BIT #BIT1,R5 sTEST FOR WRITE ERROR. 
BEQ 34 sSKIP WRITE ERROR MSG IF NO WRITE ERROR. 
PRINTB @MSG2 sPRINT WRITE ERROR MESSAGE. 
024422 MOV @MSG2, -( SP) 
000001 MOV #1,-(SP) 
MOV SP ,RO 
TRAP C$PNTB 
000004 ADD 24 ,SP 
4$: PRINTX @MSG3 sSUGGEST THAT DHV11-M MAY BE AT WRONG ADDRESS. 
024501 MOV @MSG3, -C SP) 
000001 MOV #1,-(SP) 
MOV SP ,RO 
TRAP C$PNTX 
000004 ) #4,SP 
PASS sRESTORE THE GPR CONTENTS. 
JSR PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
ENDMSG 
L10002: 
TRAP C$MSG 
101 102 MSGi:: .ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY READ ATTEMPT. sN/ 
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2296 024422 045 101 102 MSG2:: .ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT. sN/ 


2297 024501 045 101 104 MSG3:: .ASCIZ /#ADHV11-M MAY BE AT THE WRONG Q-BUS ADLRESS.sNSN/ 


2298 
2299 -EVEN 








SEQ 0054 





2331 


2332 
2333 


2334 
2335 


024562 
024562 
024562 
024562 


024566 
024570 
024572 


024574 
024574 
024576 


024640 
024640 


024642 
024642 
024642 


004537 


010102 
105722 
001376 


010146 
012746 
012746 
010600 
104414 
062706 


010246 
012746 
012746 
010600 
104414 
062706 


004736 


104423 


005474 


005630 
000002 


000006 


005630 
000002 


000006 





rr 
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SEQ 0055 
- EROZO1 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ERO2ZO1 - 
FORRES EEEEESEE EEE EHEEEEEEESEDEAEEOEEEEEEEEEEEEEERODEDEEEEOEEEEEEEEEEEREEEDEES 
34 This is an error reporting subroutine which prints 2 conti guous 
;* ASCII error messages. The address of the first message is passed 
;4 as an input peremeter and the address of the second is found by 
;* searching for the end of the first message. 
;* 
3;@ INPUTS: Rl - Address of the first message to print. 
34 
3@ OUTPUTS: A messages is printed at the operator console. 
34 
3# CALLING SEQUENCE: Load the address of the first message in R1. 
34 Include the label “ERO201” as the message pointer 
34 peremeter in the Diag Super error report macro cell. 
3% 
3@ COMMENTS: The message is printed as Basi- error information. 
34 The second message should follow the first one in the program 
34 memory. Each message should be defined using .ASCIZ 


;¢ 


;# SUBORDINATE ROUTINES USED: None. 


FPSCARERESEAESESESESSSEEEAEEAEESEEEREAAAEEAEEEESEAESEASEEEEAAEEEEDEEERAEEE EELS 


BGNMSG ERO0201 


SAVE 
JSR 
MOV R1,R2 
23: TSTB = (R2)+ 
BNE 2s 


PRINTB #€F0503,R1 


PRINTB #€F0S503,R2 


PASS 
JSR 


ENDMSG 


ERO2O1:: 
;SAVE THE GPR CONTENTS. 
RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 


sCHECK FOR A ZERO BYTE (END OF MESSAGE). 
sLOOP UNTIL NEXT MESSAGE IS FOUND. 


sPRINT THE FIRST MESSAGE. 
MOV R1,-(SP) 
MOV EF OSO3, -( SP) 
MOV #2,-(SP) 


MOV SP RO 
TRAP C$PNTB 
ADD #6 ,SP 


sPRINT THE SECOND MESSAGE. 
MOV R2,-(SP) 


TRAP C$PNTB 
ADD #6 ,SP 
sRESTORE THE GPR CONTENTS. 
PC,a(SP)-+ sRETURN TO PREGOS SUBRT. 
L10003: 
TRAP C$MSG 
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2358 
2359 





010146 
012746 
012746 
010600 
104414 
062706 


104423 


005630 
000002 


000006 
















SEQ 0056 
- EROSOS - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSOS - 
SPSS EAESEEEEEEESEEEEESAEAESESAREEEEEEREEEEREEEEEEEAEEEEEEEEEEAAEEEEEEEEEEDS 
34 This is an error reporting subroutine which prints an additional error 
3@ message whose address is pessed as an input parameter. 
9* 
3@ INPUTS: Rl - Address of the message to print. 
3% 
3# OUTPUTS: A messages is printed at the operator console. 
3% 
3# CALLING SEQUENCE: Load the address of the message in R1. 
34 Include the label “ERO5S03” as the message pointer 
34 parameter in the Dieg Super error report macro cell. 
34% 
3* COMMENTS: The message is printed as Basic error information. 
34 


3# SUBORDINATE ROUTINES USED: None. 
FHPREESEASEEAAEEEEEEEAAE SEARS EEAAEEAEEEEAAEEEEAEEEAAEEE GREE EEAEREDEEAEREEEEEEES 


BGNMSG EROS03 
EROSO3: : 


PRINTB #€FOS503,R1 sPRINT THE MESSAGE. 





R1,-(SP) 


ENDMSG 
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SEQ 0057 
GLOBAL ERROR REPORTING ROUTINE - EROSO4 - 
2361 -SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSO4 - 
2362 EE hachaieeteladeetaeechee hit LtitTTTLL LIT LL Litt titi T TTT TTT TTT TTT TTT TTT TT tT 
2363 34 This is an error reporting subroutine which prints additional error 
toes 3% messages when illegal interrupts are received. 
2 3* 
2366 3 INPUTS: Rl - Address of the message to print. 
oo ;* R2 - Number of illegal interrupts received. 
ro 
to44 3# OUTPUTS: Messagess are printed at the operator console. 
3* 
2371 3* CALLING SEQUENCE: Load the address of the message in R1. 
2372 3* Load the number of illegel ints in R2. 
2373 i* Include the label “EROS04” as the message pointer 
oere 34 peremeter in the Diag Super error report macro call. 
2 3% 
2376 :* COMMENTS 
2377 3% 
2378 3# SUBORDINATE ROUTINES USED: None. 
2379 FERRARA AEAEEEEREEEREREEEEEESELEREAEARAEEAEAAAEAEAEEAEEEREREAREREARARALAEEEERES 
2380 
2381 024670 BGNMSG ERO504 
- 024670 EROS04: : 
2382 
2383 024670 PRINTB #€FO503,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
024670 010146 MOV R1,-CSP) 
024672 012746 005630 MOV #EF 0503, -( SP) 
024676 012746 000002 MOV #2,-(SP) 
024702 010600 MOV SP ,RO 
024704 104414 TRAP CS$PNTB 
024706 062706 000006 ADD %6,SP 
2384 024712 PRINTX #€F0505,R2 sPRINT THE NUMBER OF INTS RECEIVED. 
024712 010246 MOV R2,-(SP) 
024714 012746 005635 MOV #EFO505, -( SP) 
024720 012746 000002 MOV #2,-(SP) 
024724 010600 MOV SP ,RO 
024726 104415 TRAP C$PNTX 
-_ 024730 062706 000006 ADD #6,SP 
2 
2386 024734 ENDMSG 
024734 L10005: 


024734 104423 





C$MSG 


—— 





















CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 44 


SEQ 0058 
GLOBAL ERROR REPORTING ROUTINE - ER1601 - 
2388 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1601 - 
2389 hahahahaha L LLL LiL tii TTT TT TTT TTT TT TTT TTT TTT Tre T tT 
2390 34 This en error reporting subroutine which prints additional error 
2391 i* information if an error is detected in one of the device register 
2392 34 eccess tests. 
2393 34 This subroutine reports the actual and expected from the device 
core 34 register(s) which is(ere) in faulty. 
2 3* 
2396 ;* INPUTS: R1 - Actual date (unused bits set to 0). 
2397 34 R2 - Expected date (unused bits set to 0). 
2398 3% R3 - Offset Cin bytes) to the register being tested. 
2399 34 RS - Line number of register being tested. 
one ;4 RMATBB - Label at base of register message address table. 
1 i* 
os | 3# OUTPUTS: Messages are printed at the operators console. 
7* 
2404 3* CALLING SEQUENCE: Include the lable "ER1601” as the message pointer 
2405 34 parameter in the DRS error report macro call. 
2406 3* 
2407 3:* COMMENTS: 
2408 34 
2409 3* SUBORDINATE ROUTINES CALLED: NONE 
2410 jPRESRRERE ORES EASES EE DAES ERED EEE DEEDES DEES EOE ODES OEE OEE EEOEREEEEEEEEEEREREES 
2411 024736 BGNMSG €ER1601 
nese 024736 ER1601:: 
ay 024736 016304 002340 MOV RMATBBC(R3) ,R4 sFETCH ADDRESS OF REGISTER NAME MESSAGE. bp 
41 
2415 024742 PRINTB #€F1604,R4,R5 sREPORT BASIC MESSAGE (REG NAME AND LINE @). 
024742 010546 MOV RS,-(SP) 
024744 010446 MOV R4,-(SP) 
024746 012746 006177 MOV #EF 1604, -( SP) 
024752 012746 000003 MOV #3,-(SP) 
024756 010600 MOV SP ,RO 
024760 104414 TRAP C$PNTB 
024762 062706 000010 ADD #10, SP 
2416 024766 PRINTX #€F1602,R2 sPRINT THE EXPECTED DATA. 
024766 010246 MOV R2,-(SP) 
024770 012746 006073 MOV EF 1602, -( SP) 
024774 012746 000002 MOV #2,-(SP) 
025000 010600 MOV SP ,RO 
025002 104415 TRAP C$PNTX 
025004 062706 000006 ADD 06 ,SP 
2417 025010 PRINTX #€F1603,R1 sPRINT THE ACTUAL DATA. 
025010 010146 MOV R1,-(SP) 
025012 012746 006135 MOV #EF 1603, -(SP) 
025016 012746 000002 MOV #2,-(SP) 
025022 010600 MOV SP ,RO 
025024 104415 TRAP C$PNTX 
025026 062706 000006 ADD #6 ,SP 
2418 025032 ENDMSG 
025032 L10006: 





025032 104423 C$MSG 


-— 
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SEQ 0059 
GLOBAL ERROR REPORTING ROUTINE - ER1603 - 

2420 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 

2421 §ORSEEEEEEEEEEEE6E OE 266066 600604040660 0006 0006 660000000000000600000000000000008 

2422 16 This error reporting routine is used to print out e basic error 

2423 ;* message, along with a message informing the operator which test is 

oes i* about to be aborted. 

fe 

2426 3* INPUTS: Rl - Contains the address of the message to be printed. 

2427 34 ERRMSG - Contains the address of the a that indicates 

5429 on the test that is being performed, eg DMA, EAK etc. 

3% 
2430 3* OUTPUTS: Messages ere printed at the operators console. 
Beas 3* “testname TEST ABORTED” 
4 3* 

2433 3# CALLING SEQUENCE: Include the lable “ER1603” as the message pointer 

esas 34 parameter in the DRS error report macro call. 
4 ;* 

2436 ;* COMMENTS: 

2437 :* 

2438 :* 

2439 3* SUBORDINATE ROUTINES CALLED: None. 

2440 jPORRRESEEEEEREREEESESEESEEEEREDAE EE EEEEDEED DEED ODED ODES OE EEO OEEEEEEEEEEEER EES 

2441 025034 BGNMSG ER1603 
025034 ER1603:: 

2442 025034 SAVE sSAVE THE CONTENTS OF THE GPRS. 

meen 025034 004537 005474 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 

2444 025040 PRINTB #€F0503,R1 sPRINT BASIC MESSAGE ON OPERATORS CONSOLE. 
025040 010146 MOV R1i,-(SP) 
025042 012746 005630 MOV #€F 0503, -( SP) 
025046 012746 000002 MOV #2,-(SP) 
025052 010600 MOV SP ,RO 
025054 104414 TRAP CS$PNTB 

—_— 025056 062706 000006 ADD #6 ,SP 

2446 025062 013702 005470 MOV ERRMSG ,R2 sGET THE “TEST MESSAGE”. 

2447 025066 PRINTB @€F1601,R2 sPRINT “TEST ABORTED” MESSAGE. 

025066 010246 MOV R2,-(SP) 
025070 012746 006047 MOV #€F 1601, -(SP) 
025074 012746 000002 MOV #2,-(SP) 
025100 010600 MOV SP ,RO 
025102 104414 TRAP CS$PNTB 
ween 025104 062706 000006 ADD #6 ,SP 
44 

2449 025110 PASS sRESTORE THE CONTENTS OF THE GPRS. 

025110 004736 JSR PC ,ACSP)+ sRETURN TO PREGOS SUBRT. 

2450 025112 ENDMSG 
025112 L10007: 

025112 104423 TRAP C$MSG 





—— 
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GLOBAL ERROR REPORTING ROUTINE 


i. 


2472 


2473 
2474 


2475 


2476 


2477 
2478 


025114 
025114 


025114 


025176 


025202 
025202 
025202 


010146 
012746 
012746 
010600 
104414 
062706 


010546 
012746 
012746 
010600 
104415 
062706 


010446 
012746 
012746 
010600 
104415 
062706 


104423 


005630 
000002 


0000v0 


006274 
000002 


000006 


006343 
000002 


000006 








SEQ 0060 


- ER3OO1 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER3001 - 

FEREEEEEEEEESE SESE EEEEOEEE DE EEEEEEEEEEEE OE OEEEEEOEEEODOEEEEEEEEEEEDEREEEEEEEEES 
3* This is an error reporting subroutine which is intended for use in the 
34 Interrupt BR Level Test. It reports additional information when an 

34 interrupt hes occurred at the wrong BR level. 


3* INPUTS: Rl - Address of message to print first. 

;* R4 - BR level at which the int request occurred. 
;* RS - Expected or correct BR level for the DUT. 
;* 

3# OUTPUTS: A messages is printed at the operator console. 

s 


; 
s# CALLING SEQUENCE: Include the label “ER3001” as the message pointer 
;* parameter in the Diag Super error report macro cell. 


74 
3* COMMENTS: The message is printed as Basic and Extended error information. 


3* 
s# SUBORDINATE ROUTINES USED: None. 
FERERESEEREESEEEASESEAEAEEEEREREERAREAAEEAEESESEESESEEEEER ERED EREAEEDEEREEEERES 





BGNMSG ER3001 
ER3001:: 
PRINTB #EFOS03,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
MOV Ri, -(SP) 
MOV #EFOS03, -( SP) 
MOV ) 
PRINTX .@€F3001,R5 sREPORT EXPECTED BR LEVEL. 
PRINTX #€F3002,R4 sREPORT ACTUAL BR LEVEL. 
ENDMSG 
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GLOBAL ERROR REPORTING ROUTINE 


-— 


2512 
2513 
2514 
2515 


2516 
2517 
2518 
2519 


2520 


004537 


005002 
012703 


010146 
012746 
012746 
010600 
104414 
062706 
000241 
006205 
103011 


010246 
012746 
012746 
010600 
104414 
062706 
005202 
020302 
001362 


004736 


005474 


000010 


005630 
000002 


000006 


006527 
000002 


000006 
























SEQ 0061 
- ER6401 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER6401 - 
ERRORS OREESAEAEEEEEEED ED OSEOEEEEEEODEEDE EE EEOEEEEEODOOO4000008000060000000088 
;* This is an error reporting subroutine which prints additionel error 
3* information after the error message header. 
74 This subroutine is passed a GPR containing a which indicate 
:* the line(s) for which the error condition should be reported. 
Aes 
3;* INPUTS: Ri - Address of the mess to be printed by this routine. 
34 RS - Contains the error flags, (1 flag per line). 
7 
3* OUTPUTS: Messages are printed at the operator console. 
Gk 
+* CALLING SEQUENCE: Load the address of the message in R1. 
;* Include the label “ER6401” as the message pointer 
34 perameter in the Diag Super error report macro call. 
;* 
3* COMMENTS: The output format of this message is: 
;* TEXT MESSAGE 
3* @nn 
:* enn 
;* sae 
:* Where each “#nn” is the number of a line with the error. 


+* SUBORDINATE ROUTINES USED: None. 
SPREE EAAEEEEEAEEEEEEEEEESEEEEEESEEAEAEEEREEEREREEEEEAEDERED ERED EEDEEEEEEEEEEES 


BGNMSG ER6401 


ER6401:: 
SAVE s;SAVE THE CONTENTS OF THE GPRS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
CLR R2 ;CLEAR LINE NUMBER TO ZERO. 
MOV @NUMLNS , R3 ;SET UP MAX LINE COUNT. 
PRINTB #EFO503,R1 ;PRINT MESSAGE. 
MOV R1,-(SP) 
MOV #EFO503, -( SP) 
MOV #2,-(S 
MOV SP ,RO 
TRAP C$PNTB 
ADD #6 ,SP 
CLC ;CLEAR CARRY. 
2s: ASR R5 sSHIFT FLAG OUT INTO CARRY BIT. 
BCC 4$ sSKIP ERROR REPORT IF CLEAR. 
PRINTB #€F6401,R2 sPRINT MESSAGE. 
MOV R2,-(SP 
MOV #EF6401, -( SP) 
MOV #2,-(SP) 
MOV SP ,RO 
TRAP C$PNTB 
ADD 06 ,SP 
4$: INC R2 ; INCREMENT LINE COUNT. 
CMP R3,R2 s;CHECK IF MAX LINE COUNT EXCEEDED. 
BNE 2s ;LOOP IF NOT DONE. 
60$: PASS sRESTORE THE SAVED CONTENTS OF THE GPRS. 
ames JSR PC ,a(SP)+ ;RETURN TO PREGOS SUBRT. 
N 


L10011: 


Ee 
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GLOBAL ERROR REPORTING ROUTINE - ER6401 - 
025300 104423 


r-— 





TRAP 


C$MSG 






SEQ 0062 


re cae 
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GLOBAL ERROR REPORTING ROUTINE 


- 


2546 
2547 





- ER7801 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE 
i PECREEEEEEE SEES EEE EE EEEEDE DEES OE EEODEEOD OOOO O00060000000000000000000006000008 


;* This is an error reporting subroutine which prints an additional error 
3% message whose address is pessed as an input perameter. A line number 
;* is included at the end of the message. 

3* 

:* INPUTS: Ri - Address of the message to print. 

:8 R3 - Number of line on which error occurred. 


3* Load the line number into R3. 

34 Include the label “ER7801" as the message pointer 
;* peremeter in the Dieg Super error report macro cell. 
3* 

;* COMMENTS: The message is printed eas Basic error information. 

;* 


& 
3# OUTPUTS: A messages is printed at the operator console. 
R 

3# CALLING SEQUENCE: Load the address of the message in R1. 


3# SUBORDINATE ROUTINES USED: None. 


FPRREREEEE EEE EEEE DS EEEEEEEEEE ODDS EEEEEEEEEEEE ES EAEREEEEEEEEEDEDREEEEREREREREEA 


BGNMSG €ER7801 


PRINTB #€F7801,R1,R3 


ENOMSG 





sPRINT THE MESSAGE. 


- ER7801 - 















SEQ 0063 


ER7801:: 

MOV R3,-(SP) 

MOV R1,-(SP) 

MOV EF 7801, -( SP) 

MOV SP ,RO 

TRAP CSPNTB 

ADD #10,SP 
L10012: 


C$MSG 
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GLOBAL ERROR REPORTING ROUTINE - ER9001 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9001 - 

























2550 § POOSO6066 56660606 0606000006000000000000000000000000000000000000000000000000008 
2551 3% This is en error reporting subroutine which reports an unexpected 
2552 3% code which has been found in the DUT CSR. This code can be a BMP 
po 94 3* code, a Self-test code, or e Modem Status code. 
34% 
2555 3;@ INPUTS: Rl - Address of message to print first. 
2556 34 R2 - Single byte code which has been read from the DUT. 
cose 34 R4 - Line number essociated with the code. 
3* 
= 3# OUTPUTS: A messages is printed at the operator console. 
3* 
2561 3# CALLING SEQUENCE: Include the label “ER9001” as the message pointer 
ta 3% peremeter in the Dieg Super error report macro cell. 
3% 
eae 3* COMMENTS: The message is printed es Basic and Extended error information. 
3 
2566 :# SUBORDINATE ROUTINES USED: None. 
2567 j FOOSE OEDEOE EEE 6066 66060000 06060000000000000006 0000000000060000000000000000008 
2568 
2569 025330 BGNMSG ER9001 
ae 025330 ER9001:: 
2571 025330 PRINTB #€F9001,R1 sREPORT TYPE OF CODE FOUND. 
025330 010146 MOV R1,-C(SP) 





025332 012746 007051 MOV 






025346 062706 000006 ADD #6 ,SP 

2572 025352 PRINTX #@€F9002,R4 sREPORT THE LINE NUMBER OF THE CODE. 
025352 010446 MOV R4,-C(SP) 
025354 012746 007133 MOV @EF 9002, -( SP) 





ADD 
2573 025374 PRINTX #€F9003,R2 sREPORT THE CODE WHICH WAS ——. 
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GLOBAL ERROR REPORTING ROUTINE - ER9002 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9002 - 
















2578 § POOSE66 6666 060606 0606 060600060000000000000000000000000000000000000000000000008 
2579 3% This is an error reporting subroutine which is intended for use in the 
2580 3% trenmsission and reception tests. It reports the type of error which 
2581 3* hes occurred when incorrect date is received from the DUT. This 
ioe} 3% routine also reports the read end expected date velues. 
3* 
2584 3* INPUTS: Rl - Address of message to print first. 
2585 34 R2 - Dete byte reed from the DUT. 
2586 3% R3 - Line number multiplied by 2. 
add 34 R4 - Expected date byte, bit 15 set if “NONE”. 
3% 
ised 3@ OUTPUTS: A messages is printed et the operator console. 
3% 
2591 s# CALLING SEQUENCE: Include the lebel “ER9002” as the message pointer 
aone 34 peremeter in the Dieg Super error report macro cell. 
34 
ised 3# COMMENTS: The message is printed as Basic and Extended error information. 
3% 
2596 s# SUBORDINATE ROUTINES USED: PRTLPR. 
2597 § OOS 66666606 6060606660606060006666606000000000000000000000000000000000000000000 
2598 
2599 025420 BGNMSG ER9002 
025420 ER9002: : 










2601 025420 006203 ASR R3 sCALCULATE THE LINE NUMBER. 

2602 025422 042702 177400 BIC #177400,R2 sMASK OUT ALL BUT DATA IN READ CHAR. 

2603 025426 PRINTB @€F9006,R1,R3  ;PRINT THE FIRST LINE OF THE MESSAGE. 
025426 010346 MO 





2604 025452 PRINTX #€F9004,EM9010,R2 sPRINT ACTUAL DATA. 









000010 ADO #10, 
2605 025500 005704 TST R4 sCHECK FOR “NONE” CODE SET IN EXPECTED DATA. 
2606 025502 100414 BMI 2 sBRANCH TO PRINT “NONE” MESSAGE IF FLAG SET. 
2607 oreees inant PRINTX #€F9004, #EM9009,R4 sPRINT EXPECTED DATA. 








2608 025532 000412 BR 60% sEXIT THIS ROUTINE. 

2609 025534 2%: PRINTX @€F9005,@EM9009 ;PRINT MESSAGE INDICATING NO EXPECTED DATA. 
025534 012746 022634 MOV @€9009, -( SP) 
025540 012746 007303 MOV @€F 9005, -( SP) 
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GLOBAL ERROR REPORTING ROUTINE - ER9002 - 
025544 012746 000002 


025554 062706 000006 ADO 
2610 025560 004737 032640 60$: JSR PC .PRTLPR sPRINT CONTENTS OF THE LPR REGISTER. 
2611 025564 ENDOMSG 

025564 L10014: 








TRAP 
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SEQ 0067 
GLOBAL ERROR REPORTING ROUTINE - ER9003 - 
2613 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9003 - 
2614 FEOSOSESEAESEASEEEEEEEEAEEEEEEEEOAEEEEEEEREDEEES HEED EEEEEEOEODEEEEEEEEEREDEEEDE 
2615 3¢ This is en error reporting subroutine which is intended for use in the 
2616 34 trenmsission and reception tests. It reports error information when 
2617 3# a cheracter has been read from the DUT with an error flag or flags 
pote ;¢ set (ie. over-run, framing, or parity flag). 
61 ;* 
2620 3 INPUTS: R2 - Date byte read from the DUT, including error flags. 
2621 34 R3 - Line number multiplied by 2. 
2622 3* F 
pees 3@ OUTPUTS: A messages is printed at the operator console. 
34 
2625 3# CALLING SEQUENCE: Include the label “ER9003” as the message pointer 
aoe 34 peremeter in the Diag Super error report macro call. 
34 
2628 3;* COMMENTS: The message is printed as Basic and Extended error information. 
2629 34 The contents of the Indirect address register field of the DUT 
2630 34 CSR may be altered. 
2631 :* 
2632 3# SUBORDINATE ROUTINES USED: None. 
2633 FERREAEEEEEEESEREEEAASAESEEEAEESEEAEEEEAEEEAEEAEERESEREREAEEEAEEEREEEDEEEEEEEES 
2634 
2635 025566 BGNMSG ER9003 
025566 ER9003: : 
2636 
2637 025566 006203 ASR R3 sCALCULATE THE LINE NUMBER. 
2638 025570 PRINTB €F9007,R3 sREPORT THE ERROR TYPE AND LINE NUMBER. 
025570 010346 MOV R3,-(SP) 
025572 012746 007360 MOV %€F 9007, -( SP) 
025576 012746 000002 MOV #2,-(SP) 
025602 010600 MOV SP ,RO 
025604 104414 TRAP C$PNTB 
025606 062706 000006 ADD . #6 ,SP 
2639 025612 010201 MOV R2,R1 sEXTRACT THE RECEIVED CHARACTER FROM THE 
2640 025614 042701 177400 BIC #177400,R1 ; PASSED IN CHAR VALUE WITH FLAGS. 
2641 025620 PRINTX #€F9008,R1 sREPORT THE VALUE OF THE RECEIVED CHAR. 
025620 010146 MOV R1i,-(SP) 
025622 012746 007454 MOV #EF 9008, -( SP) 
025626 012746 000002 MOV #2,-(SP) 
0256352 010600 MOV SP ,RO 
025634 104415 TRAP CS$PNTX 
‘ 025636 062706 000006 ADD #6 ,SP 
264 s¢ 
2643 ; Report OVERRUN flag set if necessary. 
2644 i 
2645 025642 012701 022704 MOV 9€M9011,R1 ;SELECT THE OVERRUN ERROR MESSAGE. 
2646 025646 032702 040000 BIT *B1IT14,R2 sCHECK OVERRUN ERROR FLAG IN PASSED IN CHAR. 
2647 025652 001402 BEQ 2s sSKIP ERROR IF OVERRUN ERROR FLAG WAS CLEAR. 
2648 025654 004737 025716 JSR PC ,50$ sREPORT THE OVERRUN ERROR FLAG WAS SET. 
2649 ‘* 
— ; Report FRAMING flag set if necessary. 
651 $- 
2652 025660 012701 022714 2s: MOV #€M9012,R1 sSELECT THE FRAMING ERROR MESSAGE. 
2653 025664 032702 020000 BIT $B1T13,R2 sCHECK FRAMING ERROR FLAG IN PASSED IN CHAR. 
2654 025670 001402 BEQ 4s sSKIP ERROR IF FRAMING ERROR FLAG WAS CLEAR. 
— 025672 004737 025716 JSR PC ,50$ sREPORT THE FRAMING ERROR MESSAGE. 
6 3° 





-— 


o - 





GLOBAL ERROR REPORTING ROUTINE 


2657 


2669 
2670 
2671 
2672 


025740 


025742 
025746 
025746 
025746 


012701 
032702 
001415 
004737 
000412 


010146 
012746 
012746 
010600 
104415 
062706 
0002°/ 


004737 


104423 


022724 
010000 


025716 


007513 
000002 


000006 


032640 





ef 
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- ER9003 - 
; Report PARITY fleg set if necessary. 










- 
4$: MOV 0€M9013,R1 sSELECT THE PARITY ERROR MESSAGE. 
BIT #BIT12,R2 sCHECK PARITY ERROR FLAG IN PASSED IN CHAR. 
BEQ 60$ sEXIT ROUTINE IF PARITY ERRO FLAG WAS CLEAR. 
JSR PC 508 sREPORT THE PARITY ERROR MESSAGE. 
BR 60$ sEXIT THIS ROUTINE. 


3° 
; Local subroutine to report an error flag status. 
50$:  PRINTX €F9009,R1 
MOV R1,-(SP) 
MOV %€F 9009, -( SP) 
MOV #2,-(SP) 


MOV SP ,RO 
TRAP CS$PNTX 
ADD 06 ,SP 
RTS PC 
60$: JSR PC,PRTLPR sREPORT THE LPR CONTENTS FOR THIS LINE. 
ENOMSG 


L10015: 


nnn nnn nn nn SSS 
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SEQ 0069 
GLOBAL ERROR REPORTING ROUTINE - ER9004 - 

2674 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9004 - 

2675 FESSAASSOAEEESEEEREDSSEAEDESEEEESEEEEDAEEDEEEEEEEEEDEDOEOEOEDEEEEDREEEEEREDEEEES 

2676 ;4 This is an error reporting subroutine which reports error summaries 

2677 34 for lines which have exceeded the specified maximum number of 

2678 3% individual reception errors. 

2679 3* 

2680 ;# INPUTS: Rl - Address of message to print first. 

2681 34 ERCNTB - Label at base of line error counters table. 

pose 34 ERSMRF - “Report error summary for line” flags. 

3% 

sre 3@ O'TPUTS: A message is printed at the operator console. 

26 Hed 

2686 3# CALLING SEQUENCE: Include the label “ER9004” as the message pointer 

ood ;* peremeter in the Diag Super error report macro call. 

3* 

2689 ;* COMMENTS: The message is printed as Basic and Extended error information. 

oa 34 The contents of GPR’s R2, R3, R4, and RS are destroyed. 

691 3* 

2692 :* SUBORDINATE ROUTINES USED: None. 

2693 FRRREREESEESEEEEEEEEAEEEEEAEAEEASEAAEAAAEAEEAEAAEREEEEEEEE REEDED EEEEEEEREEEDLES 

2694 

2695 025750 BGNMSG ER9004 

aset 025750 ER9004:: 

6 

2697 025750 PRINTB #EFOS03,0EM9014 ;REPORT THE SECONDARY ERROR MESSAGE. 
025750 012746 022733 MOV #€M9014, -(SP) 
025754 012746 005630 MOV #E€F 0503, -( SP) 
025760 012746 000002 MOV #2,-(SP) 
025764 010600 MOV SP ,RO 
025766 104414 TRAP C$PNTB 
025770 062706 000006 ADD #6 ,SP 

2698 025774 005002 CLR R2 ;CLEAR THE LINE COUNTER. 

2699 025776 013703 002650 MOV ERSMRF ,R3 ;GET THE ERROR SUMMARY FLAGS. 

2700 026002 005004 CLR R4 sCLEAR “LINE COUNTER TIMES 2” OFFSET. 

2701 026004 000241 2s: CLC s;CLEAR THE CARRY FOR THE FOLLOWING ROTATE. 

2702 026006 006003 ROR R3 sSHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRY. 

2703 026010 103013 BCC 4$ sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 

2704 026012 PRINTX #€F9010,R2,ERCNTB(R4) 
“26012 016446 003452 MOV ERCNTBC(R4),-(SP) 
026016 010246 MOV R2,-(SP) 
026020 012746 007552 MOV #EF 9010, -( SP) 
026024 012746 000003 MOV #3,-(SP) 
026030 010600 MOV SP ,RO 
026032 104415 TRAP CSPNTX 
026034 062706 000010 ADD #10,SP 

2705 026040 012405 4$: MOV (R4)+,R5 sINCREMENT THE LINE OFFSET BY 2. 

2706 026042 005202 INC R2 sINCREMT THE LINE COUNTER. 

2707 026044 005703 TST R3 ;CHECK THE ERROR SUMMARY FLAGS. 

~ 026046 001356 BNE 2$ sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 

2 

2710 026050 ENDOMSG 
026050 L10016: 


026050 104423 TRAP C$MSG 
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SEQ 0070 
GLOBAL ERROR REPORTING ROUTINE - ER900S - 
2712 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9005 - 
2713 PROSE EEEESEEEEEEE ERAS SEEDED SEED DADE EE EEEE DEDEDE OEEEDEODDE OE OO 04000060040000008 
2714 34 This is an error reporting subroutine which reports incomplete data 
Sh 34 transmissions or receptions. 
1 3% 
2717 :* INPUTS: Ri - Either “TRANSMITTED” or “RECEIVED” to indicate TX or RX. 
2718 3* R2 - Bit map of lines which did not complete TX or RX. 
2719 3% R4 - Address of base of the correct character counters table. 
2720 34 DPLENB - Label at base of data pattern length table. 
hts 3* EM9015 - Symbolic address of the “TRANSMITTED” message. 
2 3% 
eras 3* OUTPUTS: A message is printed at the operator console. 
2724 3* 
2725 3# CALLING SEQUENCE: Include the label “ER9005” as the message pointer 
hae 3* parameter in the Diag Super error report macro call. 
272 3% 
2728 3* COMMENTS: The message is printed as Basic and Extended error information. 
2729 3% The contents of the indirect address field in the DUT CSR may 
2730 3* be altered. 
2731 34 
2732 ;* SUBORDINATE ROUTINES USED: PRTLPR. 
2733 jPRRREEREREREAEAAE REESE SEREEAEARAADARAEEARE ARES EE EAEEEE EERE ERED REEDED EREEEE EEE 
2734 
2735 026052 BGNMSG ER9005 
026052 ER9005:: 
2736 026052 SAVE sSAVE THE CONTENTS OF THE GPR’S. 
_ 026052 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2 
2738 026056 PRINTB #€F9013,R1 sREPORT THE SECONDARY ERROR MESSAGE. 
026056 010146 MOV R1i,-(SP) 
026060 012746 007765 MOV #E€F 9013, -(SP) 
026064 012746 000002 MOV #2,-(SP) 
026070 010600 MOV SP ,RO 
026072 104414 TRAP C$PNTB 
026074 062706 000006 ADD #6 ,SP 
2739 026100 005003 CLR R3 ;CLEAR THE LINE COUNTER. 
2740 026102 022701 023027 CMP #E€M9015,R1 sCHECK IF ADDRESS CORRESPONDS TO TX MESSAGE. 
bes 026106 001032 BNE 6$ BRANCH IF RECEPTION MESSAGE TO BE PRINTED. 
2742 
2743 i+ 
2744 ; Perform TX incomplete error message reporting. 
2745 g° 
2746 026110 PRINTX #€M9030 sPRINT “NO TX COMPLETION INTERRUPTS RECEIVED” 
026110 012746 023572 MOV #EM9030, -( SP) 
026114 012746 000001 MOV #1,-(SP) 
026120 010600 MOV SP ,RO 
026122 104415 TRAP C$PNTX 
026124 062706 000004 ADD 04,SP 
2747 026130 000241 2$: CLC sCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
2748 026132 006002 ROR R2 :SHIFT “TX NOT DONE” FLAG INTO CARRY. 
2749 026134 103013 BCC 4$ sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
2750 026136 PRINTX #€F9020,R3 sPRINT “TOO FEW TX.ACTIONS GENERATED” MSG. 


026136 010346 
026140 012746 010334 
026144 012746 000002 
026150 010600 
026152 104415 


—— 
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GLOBAL ERROR REPORTING ROUTINE 


-— 


2759 


2770 
2771 
2772 
2773 
2774 
2775 
2776 


2777 


026174 
026176 
026200 


026276 


062706 
004737 
005203 
005702 
001357 
000440 


032640 


005364 


003612 


007651 
000006 


000016 
032640 


- ER9005 - 


4$: INC 


ge 
6$: cLC 


8$: TST 


10$: PASS 


PC ,PRTLPR 
R3 


R2 

8$ 

R3 

TXRXLBCR3) RS 
R2,-(SP) 


RS,R2 
CHCNTBCRS),RS 
R2 


R3 
#€F9012,R3,R1,(R 


(SP)+,R2 
PC ,PRTLPR 
(R4)+ 


JSR 








ADD 06 ,SP 
sREPORT CONTENTS OF LPR REGISTER FOR THIS LINE. 
sINCREMENT LINE COUNTER. 
sCHECK THE “TX NOT DONE FLAGS”. 
sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
sEXIT THIS ROUTINE. 


incomplete error message reporting. 


;CLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
sSHIFT “RX NOT DONE” FLAG INTO CARRY. 
sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
sSHIFT LINE # TO GIVE CORRECT TABLE OFFSET. 
sGET THE “ASSOCIATED” RECEIVE LINE OFFSET. 
sSAVE THE “RX NOT DONE” FLAGS ON THE STACK. 
sCOPY THE ASSOCIATED TX LINE OFFSET. 
sGET THE TOTAL NUMBER OF EXPECTED CHARS. 
sSHIFT THE TABLE OFFSET TO GIVE A LINE NUMBER. 
sSHIFT TABLE OFFSET TO GIVE LINE NUMBER. 
4),R5,R2 ;REPORT NUMBER OF CHARS ON LINE. 

MOV R2,-(SP) 

MOV RS,-(SP) 

MOV (R4),-C(SP) 

MOV R1,-(SP) 

MOV R3,-(SP) 

MOV > he at 


MOV eRO 
TRAP C$PNTX 
) #16,SP 


AD 
sRESTORE THE “RX NOT DONE” FLAGS. 
sREPORT CONTENTS OF LPR REGISTER FOR THIS LINE. 
sINCREMENT THE CHARACTER COUNTER TABLE. 
sINCREMENT THE LINE COUNTER. 
sCHECK THE “RX NOT DONE FLAGS”. 
sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
sRESTORE THE CONTENTS OF THE GPRS. 

PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 


L10017: 
TRAP 


C$MSG 





SEQ 0971 
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— 


2804 


2805 
2806 





042703 


010346 
010146 
012746 
012746 
010600 
104414 
062706 


010246 
010146 
012746 
012746 
010600 
104415 
062706 


104423 


177760 


010203 
000003 


000010 


010127 
000003 


000010 





- ER9007 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9007 - 
i PSROREESESEEEEEEEEEEEEDSEOESEEESESEEREREREEEEESEREEESEEEEREREREREREEEEEEDEEEDE 


34% 
fe 
;* 
3* 
;* 
;* 


FERRER EAESAEEESEEARERERESESAREREASEESAEAEAAAEEEEEAEAEAEREEEDEAEAREEEEEEEEEEAEES 

















SEQ 0072 


This is an error reporti subroutine which is used to report that 
something other than ea selftest code was found in a selftest code 


FIFO slot during the removel of the selftest codes from the FIFO. 
This routine is used by the RSTRPT routine. 
INPUTS: Ri - Address of error message qualifier string. 
R2 - Incorrect code as read from the selftest code FIFO slot. 
R3 - Line number associated with the selftest FIFO slot. 
OUTPUTS: A message is printed at the operator console. 
CALLING SEQUENCE: Include the label “ER9007” as the message pointer 


pereameter in the Diag Super error report macro call. 
COMMENTS: The message is printed as Basic and Extended error information. 
SUBORDINATE ROUTINES USED: None. 
BGNMSG £R9007 
ER9007: : 
BIC #177760,R3 sREMOVE ALL BUT LINE # BITS FROM LINE @ WORD. 


PRINTB #€F9018,R1,R3  ;REPORT SECONDARY ERROR MESSAGE. 
MOV R3,-(SP) 


ADD 
PRINTX #€F9017,R1,R2 ;REPORT THE ACTUAL INCORRECT — 
Vv 


ENDMSG 
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SEQ 0073 
GLOBAL ERROR REPORTING ROUTINE - ER9008 - 
2808 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9008 - 
2809 FPSEREREEEEESEEEEEEDEEEEEE OEE OS OEEEODED DS 144404400604 0408 0006 00000000000008008 
2810 34 This is en error reporting subroutine which is used to report that 
28611 ;* an unexpected code or character has been found in the DUT receive 
2812 ;* cheracter FIFO. 
2813 . 34 
2814 3* INPUTS: Rl - Address of pertiel error message string. 
oy ;* R2 - Incorrect code as read from the selftest code FIFO slot. 
;* 
root 3* OUTPUTS: A message is printed at the operator console. 
1 3* 
2819 3# CALLING SEQUENCE: Include the label “ER9008” as the message pointer 
oot ;* peremeter in the Diag Super error report macro call. 
;* 
— 3* COMMENTS: The message is printed as Basic and Extended error information. 
;* 
2824 3* SUBORDINATE ROUTINES USED: None. 
2825 FEERAAEEAEESESEEEEAEEEEEEEEEEEAEEEEEEAEAAEAREEREEREAEAEARE EERE EREEEEEEEEEEEE EES 
2826 
2827 026356 BGNMSG ER9008 
026356 ER9008: : 
2828 
2829 3¢ 
2830 ; Extract the line number from the incorrect code or character which was read 
pees ; from the selftest code FIFO slot. 
- 
2833 026356 010203 MOV R2,R3 
2834 026360 000303 SWAB R3 
2835 026362 042703 177760 BIC #177760,R3 ;CALCULATE LINE NUMBER OF CODE. 
2836 026366 PRINTB #E€F9016,R1,R3 sREPORT TYPE OF INCORRECT CODE FOUND. 
026366 010346 MOV R3,-CSP) 
026370 010146 MOV R1i,-(SP) 
026372 012746 010032 MOV @EF 9016, -(SP) 
026376 012746 000003 MOV #3,-(SP) 
026402 010600 MOV SP ,RO 
026404 104414 TRAP C$PNTB 
026406 062706 000010 ADD #10,SP 
2837 026412 PRINTX #€F9017,R1,R2 sREPORT THE ACTUAL INCORRECT CODE. 
026412 010246 MOV R2,-(SP) 
026414 010146 MOV R1,-(SP) 
026416 012746 010127 MOV EF 9017, -( SP) 
026422 012746 000003 MOV 03,-(SP) 
026426 010600 MOV SP ,RO 
926430 104415 TRAP CSPNTX 
on 026432 062706 000010 ADD #10, SP 
2 
2839 026436 ENDMSG 
026436 L10021;: 
026436 104423 T C$MSG 





e— 
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2863 
2864 





010146 
010246 
012746 
012746 
010600 
104414 
062706 


104423 


007334 
000003 


000010 





- ER9101 - 

-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 

SPEREEEAEE SEES EEEEEE EE 644464 0406040666446000046 6666600006 040804000000006000440004 
34 This is @ general error reporting subroutine which reports a message 
34 which takes a single, 2 digit decimal argument after the end of an 
:* ASCII message. 

;* 

3* INPUTS: Rl - Value to be printed after msg as 2 decimal digits. 

;* R2 - Address of message to print first. 

3% 

3* OUTPUTS: A messages is printed at the operator console. 

3* 

3# CALLING SEQUENCE: Include the lebel “ER9101” as the message pointer 

34 parameter in the Diag Super error report macro cell. 
7* 

3# COMMENTS: The message is printed as Basic error information. 

3* 


s# SUBORDINATE ROUTINES USED: None. 
Te dacechachatiatachatnetatetaateecateteneen ent LLL LL LLL LLL LLL TT TTT TTT Trt T TTT ttt 


BGNMSG ER9101 
ER9101:: 


PRINTB #EF9006,R2,R1 ;REPORT THE STRING FOLLOWED BY 7 NUMBER. 
V 


ENOMSG 











SEQ 0074 








CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 57 



















SEQ 0075 
GLOBAL ERROR REPORTING ROUTINE - ER9102 - 
2866 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9102 - 
2867 jPRSEEEEEE SEEDED EE EE ES 6666060606 4600006006 0606 000000060000000000000000000000008 
2868 3e This is en error reporting subroutine which prints additionel error 
2869 ;* information efter the error message header. 
2870 pa This routine is passed a bit map which specifies the lines for which 
pods je the error condition should be reported. 
;* 
2873 3* INPUTS: Rl - Address of the message to be printed by this routine. 
pod ;* R2 - Bit map of lines for which to report errors. 
;* 
pode ;* OUTPUTS: Messages are printed at the operator console. 
3* 
2878 3# CALLING SEQUENCE: Load the address of the message in R1. 
2879 34 Load the bit map of lines with errors in R2. 
2880 :* Include the label “ER9102” as the message pointer 
oo} i* CERRBLK) in the Diag Super error report macro call. 
3% 
2883 3* COMMENTS: The output format of this message is: 
2884 34 “TEXT MESSAGE POINTED TO BY Ri” 
2885 :* “ERROR CONDITION ON LINE nn” 
2886 ;* “ERROR CONDITION ON LINE ...” 
2887 ;* The top message, and the message for each line are printed 
2888 ;* es basic error information. 
2889 ;* 
2890 3* SUBORDINATE ROUTINES USED: None. 
2891 j PORE EREEEEOREEEAEEEEEEEDEEEDED ED OE OE EKEEOE OE EEEEEDEE OE OEOEEEEDEEEEEEEEEEERAES 
2892 
2893 026466 BGNMSG ER9102 
026466 ER9102:: 
2894 026466 SAVE sSAVE THE CONTENTS OF THE GPRS. 
onen 026466 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2896 026472 PRINTB #€F0503,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
026472 010146 MOV R1i,-(SP) 
026474 012746 005630 MOV %EFO503, -( SP) 
026500 012746 000002 MOV #2,-(SP) 
026504 010600 MOV SP ,RO 
026506 104414 TRAP C$PNTB 
026510 062706 000006 ADD %6,SP 
2897 026514 005003 CLR R3 s;CLEAR THE LINE NUMBER. 
2898 026516 000241 2s: CLC sPREPARE TO ROTATE NEXT BIT OUT OF MAP. 
2899 026520 006002 ROR R2 sGET THE NEXT BIT OF THE BIT MAP. 
2900 026522 103011 BCC 4s sSKIP PRINTING MESSAGE IF THE BIT IS CLEAR. 
2901 026524 PRINTB #€F9103,R3 sREPORT THIS LINE HAD THE ERROR. 
026524 010346 MOV R3,-(SP) 
026526 012746 010420 MOV #EF 9103, -(SP) 
026532 012746 000002 MOV $2,-(SP) 
026536 010600 MOV SP ,RO 
026540 104414 TRAP C$PNTB 
026542 062706 000006 ADD #6,SP 
2902 026546 005203 4$; INC R3 sINCREMENT THE LINE COUNTER. 
2903 026550 005702 TST R2 sCHECK THE BIT MAP. 
2904 026552 001361 BNE 2s sLOOP IF NOT ALL SET BITS REMOVED FROM BIT MAP. 
2905 026554 PRINTB #E€F9101 ;PRINT A BLANK LINE. 
026554 012746 010415 MOV EF 9101, -(SP) 
026560 012746 000001 MOV #1,-(SP) 
026564 010600 MOV SP ,RO 





— 
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GLOBAL ERROR REPORTING ROUTINE 


026566 
026570 
2906 026574 
026574 
2907 026576 
026576 
026576 


— 


104414 
062706 000004 


004736 


104423 


- ER9102 - 


60$: 


PASS 
ENOMSG 


JSR 








SEQ 0076 
TRAP C$PNTB 
ADD 04,SP 
sRESTORE THE SAVED CONTENTS OF THE GPRS. 
PC,8(SP)>+ sRETURN TO PREGOS SUBRT. 
L10023: 
TRAP C$MSG 















2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 
2917 
2918 
2919 
2920 
2921 



















2930 026600 


2931 
2932 026604 
































004537 


010146 
012746 
012746 
010600 
104414 
062706 
012703 
012705 
012301 
012304 
004737 
020302 
103772 


005474 


005630 
000002 


000006 
002662 
024066 


026724 


003056 
000002 


024116 


010544 
000001 
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SEQ 0077 
GLOBAL ERROR REPORTING ROUTINE 


- ER9301 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9301 - 

§ POSEEOSEE SEES EEEE OOS 660660000006 060000000606 000000000000000000000000000000008 
if This is en error reporting subroutine which prints any BMP codes 

3% thet ere found in the BMP code queue, together with the the number of 
i# the test thet wes executing at the time the BMP code was logged. 

34% 

3 INPUTS: Rl - The address of the first message to be reported. 

;¢ R2 - The address of the next empty cell in the queue. 

3* 

3@ OUTPUTS: The test number followed by the BMP code ere printed at the 
;* operator console. 

rf 

s# CALLING SEQUENCE: Include the lebel “ER9301” as the message pointer 

1a peremeter in the Dieg Super error report macro cell. 
3* 

3# COMMENTS: The message is printed es Basic error information. 


s# SUBORDINATE ROUTINES USED: None. 
§ OOO S666666006 6666066006 00600666066000666006066060660060000004000000000000000008 


BGNMSG ER9301 
ER9301:: 


SAVE sSAVE THE GPRS ON THE STACK. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


PRINTB #€FOSO3,R1 sREPORT UNEXPECTED BMP CODES ro 


ADD 06 ,SP 
sGET THE START ADDRESS OF THE BMP CODE QUEUE. 
sGET THE MESSAGE TO BE REPORTED. 
sGET THE NUMBER OF THE TEST THAT WAS EXECUTING. 
sGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 
JSR PC ,50$ sGO REPORT THE BMP CODE. 

CMP R3,R2 sCHECK IF ALL CODES HAVE BEEN REPORTED. 
BLO 2s sIF IT IS NOT THE LAST BMP CODE THEN LOOP. 


3¢ 

3; Check if overflow has occurred. 

s The conditions for overflow ere: the pointer contains the address of the 
3 sore cell in the queue, and a bmp code has elready been written into thet 
; cell. 

g° 


MOV @BMPCQB RS 

MOV €M9302,R5 
2s: MOV (R3)+,R1 

MOV (R3)+,R4 


CMP R2, @BMPCQE -4 sCHECK IF THE POINTER IS AT THE LAST LOCATION. 

60% sEXIT IF NOT AT THE LAST LOCATION. 
TST 2(R2) sCHECK FOR A BMP CODE IN THE LAST CELL 

60% sEXIT IF NO OVERFLOW HAS OCCURED, CELL EMPTY. 
MOV CR3)+,R1 sGET THE TEST NUMBER OFF THE QUEUE. 
MOV CR3),R4 sGET THE BHP CODE OFF THE QUEUE. 
MOV #€M9303,R5 sSELECT THE MESSAGE TO BE REPORTED. 
PRINTX #€F9302 sREPORT OVERFLOW CONDITION. 

MOV @€F 9302, -( SP) 













~~ 


. rm rr 
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SEQ 0079 
GLOBAL SUBROUTINES SECTION 

2%3 -SSTTL GLOBAL SUBROUTINES SECTION 

EPS Hh dh tabatabatabainiatnlaialalnbainintnletlnintailniiniinininiiiii ii tit ttt tT tT tT tit ttt eT eT TT PEPE men 

2966 3 

2%67 3 FVTSKL3.P11 

2968 3 

cw hhh ahahahatahetniadahatabaiaiatahaialninininininininisinininitininininaiuieii ii titi titi ttt tT ttt tt TPE ee PEPE PEt 

297 

2972 

2973 see 

2974 ; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

ade 3; THAT ARE USED IN MORE THAN ONE TEST. 

6 “~ 
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GLOBAL SUBROUTINE 


3006 026760 
026760 


3013 026764 
3014 026766 
3015 026770 
3016 026772 


3023 026776 
3024 027000 
3025 027002 
3026 027004 
3027 027010 
3028 027012 
3029 027014 
3030 027016 
3031 027020 
3032 027022 
3€33 027024 


004537 


010400 
005100 
040002 
013705 


005474 


002374 


153270 





-SBTTL GLOBAL SUBROUTINE - ALTFLD - 
tee SECEOREEEE SESE OEEEESEEOS EERE SASSER EDEEEEEEEEEEEEEEEEEEODEDEDEEEDEEEEDEEEEEE 
3¢ - Alter Device Register Fields Routine - 
38 This subroutine alters the specified field of the specified device 
:* register for the specified lines. This routine can be used to set 
34 or clear bits within selected fields of selected registers. 
34 Use examples: Set RX.BAUD.RATE fields on lines 3 and 6. 
34 Clear TX.DOMA bits on all lines. 
34 
:@ INPUTS: Rl - Address of the registers to alter. 
34 R2 - Bit fields set to desired states. 
34 R3 - Bit map of lines for which to alter register. 
34 R4 - Mask of bits to alter (1 indicates change bit). 
i* CSRA - Contains the address of the device CSR. 
34 IESTAT - Saved states of the interrupt enable bits. 
34 
3@ OUTPUTS: DEVICE REGISTERS - Specified register fields altered. 
i¢ CSR IND.ADR.REG field - Destroyed. 
34 iy 
3# CALLING SEQUENCE: JSR PC ,ALTFLD 
34 
3@ COMMENTS: This routine reads the specified registers for all lines 
;4 with numbers lower than the highes specified line. 
34 This routine does not read the CSR. 
;* 
3* SUBROUTINES CALLED: None. 
t-- SERAEEESEEEEESEEAAEAEEEEESSESEEAEEAAAEEEEAEEEEAREASEEEEAEREE REEDED ALEDEEEES 
ALTFLD:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR R5 ,PREGOS s;CALL REGISTER SAVE SUBRT. 

: Set up to loop for each line: 
; Prepare the word to be ORed into the register contents. 
3 Set up the word to write into the IND.ADR.REG field of the CSR. 
‘ MOV R4,RO sCALCULATE THE NEW CONTENTS OF THE 

COM RO ; REGISTER FIELDS WHICH ARE TO BE 

BIC RO,R2 ; ALTERRED BY THIS ROUTINE. 

MOV IESTAT,RS ;SET UP TO WRITE IND.ADR.REG FIELD TO 0. 


s Loop once for each line, altering the specified field in the specified 
F register if the line has been selected for altering. 

; Exit the loop if no more lines to alter, or if we have altered the max 
F allowable number of lines (as specified by NUMLNS). 

a 


CLC sPREPARE FOR ROTATE, “TST RS” DOES THIS BELOW. 
2s: ROR R3 sGET THE LINE SELECT BIT FOR THIS LINE. 

BCC 4$ sSKIP SETUP IF LINE IS NOT SELECTED. 

MOV RS,@CSRA sSET DUT CSR IND.ADR.REG FIELD TO THIS LINE. 

MOV (R1),RO sGET THE PRESENT CONTENTS OF THE REG TO ALTER. 

BIC R4,RO sCLEAR THE BIT FIELDS WE ARE TO ALTER. 

BIS R2,RO sOR IN THE NEW STATES OF THE FIELDS. 

MOV RO,(R1) sWRITE THE NEW REGISTER CONTENTS TO THE REG. 
43: INC R5 sSET LINE NUMBER TO THE NEXT LINE. 

TST R3 sCHECK FOR UNHANDLED LINES, CLEAR CARRY FLAG. 

BNE 2s sLOOP IF SELECTED LINE(S) IS NOT HANDLED. 












SS 
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SEQ 0081 
GLOBAL SUBROUTINE - ALTFLD - 
7034 
3035 027026 60$: PASS sRESTORE GPRS. 
027026 004736 JSR PC ,a(SP)-+ sRETURN TO PREGOS SUBRT. 
3036 027030 000207 RTS PC sRETURN TO CALLING ROUTNE. 








GLOBAL SUBROUTINE 


3066 027032 
027032 
3067 027036 


3071 027042 


3074 027046 
3075 027050 
3076 027056 
3077 027062 
3078 027064 
3079 027066 
3080 027070 
3081 027072 


3086 027074 
3087 027100 
3088 027102 


3093 027104 


004537 
005037 


012705 


005000 
012737 
005737 
001410 
005200 
001373 
005305 
003371 


005037 
000241 
000461 


012704 


005474 
027252 


000001 


000001 
002450 


002446 


002450 





SS 
CVOHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 61 


- CALMSL - 


002450 


-SBTTL GLOBAL SUBROUTINE - CALMSL - 

zee SEREEEEAESESEEEREAEAESESESAEEREEEEAEEEEREEEEEEEDEEDEEEEEEEEEEEEDREEEREREEEESE 
3:4 - Calibrate Milli Second Loop count subroutine - 

34 This subroutine calibrates the timing loop which is used in the MSLOOP 
3* routine. This subroutine calculates a value for the MSLCNT variable 
3% which is the number of software loops which takes 1 ms to execute in 
34 the MSLOOP routine. This routine calibrates the count by using the 

34 Line Time Clock (LTC), so if no LTC is available the default value for 
34 the delay count must be used. 

3* 

3% 

3# INPUTS: MSLCNT - Default 1 ms delay loop count value, or 

34 velue from previous calibration. 

34 MSTICK - Number of MS per LTC clock tick. 

;4 TIMER1 - Timer counter changed by LTC interrupt service rtn. 
34 CLKHRZ - Number of LTC clicks per second (50 or 60). 

3* 

3# OUTPUTS: CARRY - Set if LTC is available, and new calibration performed. 
34 MSLCNT - New 1 ms delay loop count value if LTC available, or 
34 unchanged if no LTC is available. 

3* 

3# CALLING SEQUENCE: JSR PC ,CALMSL 

3* 

3;* COMMENTS: 


34% 
3# SUBORDINATE ROUTINES CALLED: UNSDIV,OOPS. 
i-- SEGEEEAEEEAEEREREEERAREDAEEASEEAAAEEERERASEREEEAAEEREREEAEARERAREARERE REESE 


CALMSL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
CLR 62$ s;CLEAR THE 2ND TIME FLAG. 
3?¢ 
; Synchronize with the LTC. 
- 
2s: MOV #1,R5 ;SET OUTER LOOP COUNTER TO 1 LOOP. 


sINCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <«e 
sFOLLOWING LOOP FAILS ON FUTURE, FASTER PROCESSORS. <#s 


CLR RO sCLEAR THE WAIT FOR CLOCK INT COUNTER. 
MOV #1, TIMER1 sSET UP COUNT OF 1 TO SYNCH WITH LTC. 
4$: TST TIMER1 sCHECK FOR COUNTER HAVING GONE TO ZERO. 

BEQ 6$ sJUMP OUT CF LOOP IF LTC HAS INTERRUPTED. 
INC RO sCOUNT THIS ITERATION OF THE INNER LOOP. 
BNE 4$ sLOOP IF COUNTER HAS NOT TURNED OVER. 

DEC R5 sDECREMENT THE INNER LOOP COUNTER. 

BGT 4$ sLOOP IF OUTER LOOP COUNT NOT UP. 


3+ 
; If we got no LTC interrupt, indicate that there is no LTC available. 
; LTC must be flakey, or not really an LTC at all. 


CLR CLKHRZ ;CLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
CLC sINDICATE FAILURE FOR RETURN. 
BR 60$ sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


3? 
; We are now synchronized with the LTC. 
; Set up for the calibration loop. 


6$: MOV #TIMER1,R4 sWILL TEST TIMER1 IN THE LOOP BELOW. 











GLOBAL SUBROUTINE 


3094 027110 
3095 027112 
3096 027114 
3097 027116 


3099 027122 
3100 027126 
3101 027130 
3102 027134 
3103 027136 
3104 027140 
3105 027142 
3106 027144 
3107 027146 
3108 027150 
3109 027152 
3110 027154 


3117 027160 
3118 027162 
3119 027166 
3120 027170 
3121 027172 
3122 027174 
3123 027176 
3124 027200 
3125 027202 
3126 027204 
3127 027206 


3131 027210 
3132 027214 
3133 027216 
3134 027220 
3135 027224 
3136 027226 
3137 027232 
3138 027236 
3139 027242 
3140 027244 


3142 027246 
027246 
3143 027250 


3145 027252 
3146 027254 


005003 
012714 


013705 
011400 
010037 
040200 
020003 
000261 
001406 
005305 
001367 
005301 
001363 
004737 


005401 
013702 
010203 
160502 
010204 
005005 
005301 
100403 
060304 
005505 
000773 


013701 
010403 
010502 
004737 
103402 
004737 
010137 
005137 
001277 
000261 


004736 
000207 


000000 
000000 


000001 
002462 
027254 


032412 


002462 


002460 


037234 


032412 
002462 
027252 





- CALMSL - 


8$: 
10$: 


+ 


12$: 


14$: 


———————————— SS 
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R1 
R2 


R3 
#1,(R4) 


MSLCNT RS 
(R4),RO 


We have the portion of the 


R1 

MSLCNT ,R2 
R2,R3 

RS ,R2 


14$ 


sCLEAR THE OUTER LOOP COUNTER. 
sINDICATE TO CHECK ALL BITS OF TIMER1. 
sINDICATE TO CHECK FOR TIMER1 CLEAR. 
sLOAD TIMER1 WITH COUNT OF 1. 


sLOAD MS LOOP COUNT. 

sGET THE TIMER1 VALUE. 

sSAVE WORD (LIKE IN THE REAL LOOP). 
sLEAVE ALL THE BITS. 

sCOMPARE AGAINST ZERO. 

sSET CARRY IN CASE OF SUCCESS. 

sEXIT LOOP IF TIMER1 HAS CLEARED. 
sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
sLOOP IF MS NOT UP. 

sDECREMENT THE MS TIME COUNT. 

sKEEP LOOPING. 

sWE OVERFLOWED, SOMETHING IS WRONG, ABORT. 


We have now have loop count information for one clock tick. 

We have negative of number of outer loops in R1, each is MSLCNT inner loops. 
last outer loop not executed, in R5. 

Now we calculate the total number of inner loops executed. 


sGET NUMBER OF OUTER LOOPS. 

sGET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 
sCOPY NUMBER OF LOOPS FOR MULTIPLY. 

sCALC @ OF INNER LOOPS DONE IN LAST OUTER LOOP 
;_ AND ADD TO ACCUMULATOR LSWORD. 

sCLEAR ACCUMULATOR MSWORD. 

sCHECK R1 FOR O CONDITION 

; SKIP MULTIPLICATION IF ZERO 

sMULTIPLY NUMBER OF INNER 

; LOOPS PER OUTER LOOP BY 

sNUMBER OF OUTER LOOPS PERFORMED. 


7? 
; Divide the total number of inner loops by the number of MS per LTC tick. 


3° 
16$: 


18$: 


60$: 


62$: 
64$: 


MSTICK,R1 
R4,R3 


PC ,OOPS 
R1,MSLCNT 
62$ 


2$ 


JSR 
PC 


3# OF MS PER LTC TICK IS DIVISOR. 

sLSWORD OF LOOP COUNT IS LSWORD OF DIVIDEND. 
sMSWORD OF LOOP COUNT IS MSWORD OF DIVIDEND. 
sDIVIDE NUMBER OF LOOPS BY MS PER LTC TICK. 
sBYPASS OOPS IF WE'RE OK. 

sCLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 
sSET NEW VALUE FOR MS LOOP COUNT. 

sSET THE 2ND ITERATION FLAGS IF 1ST ITERATION. 
sBRANCH IF ONLY ONE ITERATION DONE. 

sSET THE SUCCESS FLAG FOR EXIT. 


sRESTORE GPRS, 


PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 


; CARRY - SUCCESS FLAG. SET IF SUCCESS. 


s2ND CALIBRATION ITERATION FLAGS. 
sDUMMY WORD FOR STORAGE OF THE READ WORD. 





SEQ 0083 
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SEQ 0084 


GLOBAL SUBROUTINE - CHKBMP - 
3148 -SBTTL GLOBAL SUBROUTINE - CHKBMP - 
3149 5 ¢% SERRESEEEEEEEEEDEEEEEEDEEOEEEEEEEE OE OOOOOEOEEE OE EO4000000806004000000000008 
3150 34 - CHECK IF CHARACTER IS A BMP CODE - 
3151 34 This subroutine is used to check for BMP codes. 
3152 34 If a BMP code is detected, it will be saved on the queue to be reported 
aces 3* leter. The carry is used as a flag to indicate a code has been found. 
1 3* 
aa 3* INPUTS: R2 - Contains the data to be checked. 
1 ;* 
3157 3@ OUTPUTS: R1 - Contians the message to be reported. 
3158 ;* ERRBLK - Contains the error reporting routine. 
red i* Carry bit is used to indicate a BMP code found, Carry set. 
74 
3161 3* CALLING SEQUENCE: JSR PC ,CHKBMP 
3162 34 
3163 . 3@ COMMENTS: 
3164 3* 
3165 3* SUBORDINATE ROUTINES CALLED: SAVBMP. 
3166 lille ttt LLL LLL L ILL iL ttt T TTT TTT TTT TTT TTT TTT TTT Tee 
3167 
3168 027256 CHKBMP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
027256 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3169 027262 012700 170301 MOV #170301,R0 sSET UP THE FLAGS OF A BMP CODE. 
3170 027266 040200 BIC R2,RO sTRY TO CLEAR THE BMP CODE FLAGS. 
3171 027270 001011 BNE 2$ sIF NOT A BMP CODE, EXIT WITH FAILURE. 
3172 027272 004737 035624 JSR PC, SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
3173 027276 012701 021507 MOV #€M5303,R1 sPASS THE MESSAGE TO BE REPORTED. 
3174 027302 012737 025034 005472 MOV ER1603,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
3175 027310 000261 SEC sPASS FLAG TO INDICATE SUCCESS, BMP CODE FOUND. 
3176 027312 000401 BR 60$ sEXIT. 
3177 027314 000241 2$: cLc sPASS FLAG TO INDICATE FAILURE. 
3178 027316 60$: PASS Ri sRESTORE GPRS, EXCEPT 
027316 010166 000004 MOV R1i,RISLOTC SP) sPUT R1 IN STACK SLOT. 
027322 004736 JSR PC ,8(SP)+ sRETURN TO PREGOS SUBRT. 
3179 sR1 - CONTAINS THE ADDRESS OF ERROR MESSAGE. 
3180 sCARRY BIT - SET INDICATES SUCCESS. 
3181 027324 000207 RTS PC 


—— 
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- CHKEXT - 


GLOBAL SUBROUTINE 


— 


005474 
003552 


003712 


005364 
003612 





-SBTTL GLOBAL SUBROUTINE 


34 SEEEEEEEEEEEEREEEEEDEEEEDEEEESEEEEEEEDEDEE ODES OOOE 04040008 040008 00000444088 


SEQ 0085 


- CHKEXT - 





3* - Check For Extra Cheracter Routine - 

3* This subroutine checks for the condition which indicates that an extra 
3% cherecter has been received during the reception of a data pettern. 

34 If this routine determines that it is likely that an extre character 
3% has been received it indicates this in the status information returned 
34 to the calling routine. 

3% 

3@ INPUTS R3 - RX line number multiplied by 2 (offset into word tables). 
;* R4 - Base address of resync que containi RX chars. 

;* RS _- Mask of “inactive” (non-data) bits of RX and TX chars. 

34 CHCNTB - Base of number of chars to TX on each line table. 

;* RXCNTB - Base of the RX character counters table. 

34 RXPTRB - Base of the RX character pointers table. 

;* TXRXLB - Base of TX/RX line number association table. 

Hed 

3# OUTPUTS: CARRY - Set if extra character condition is verified. 

;* 

+* CALLING SEQUENCE: JSR PC ,CHKEXT 

7* 

s* COMMENTS: The following symbols are used in line comments: 

i* 0 - Character at bottom of resync que (first received). 

;* CHR1, CHR2 - 2 characters received after CHRO. 

3* EXPO - Character expected to be received next. 

34 EXP1, EXP2 - Character expected to be received after EXPO, etc. 
ae 


s* SUBORDINATE ROUTINES CALLED: None. 
| Raliellaghachatashachatistuchatasace teehee hide ttt LLL LLL LLC LT TTT TT TTT tT tt ttt 


CHKEXT:: SAVE 


3? 


JSR 
RXPTRBC(R3),R2 
(R4)+ 
CR4)+,RO 

52s 

RS ,RO 
(R2)+,R1 
RS,R1 

R1,RO 


S2$ 
RXCNTB(R3),RO 
RO 


TXRXLBC(R3),R1 
RO, CHCNTBC(R1) 
50$ 


(R4),RO 
50$ 


RS,RO 
(R2),R1 
RS,R1 
RO,R1 
52$ 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 

sGET THE RX DATA POINTER. 

sINCREMENT R4 BY 2 TO POINT TO CHR1. 

sGET CHR1 FROM THE QUE, DATA.VALID INTO N FLAG. 
sEXIT WITH “FAILURE” IF CHR1 NOT VALID. 

sREMOVE INACTIVE BITS FROM CHR1 VALUE. 

sGET EXPO FROM THE DATA PATTERN. 

sREMOVE INACTIVE BITS FROM EXPO VALUE. 

sCOMPARE CHR1 AND EXPO. 

sEXIT WITH “FAILURE” IF CHR1 <> EXPO. 

sCOMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 
; WITH THE EXPECTED NUMBER OF CHARS TO RX ON 

; LINE CNUMBER TRANSMITTED AND LOOPED BACK) TO 
s_ DETERMINE IF CHR1 IS LAST EXPECTED CHAR. 
sEXIT WITH “SUCCESS” IF CHR1 IS LAST CHAR. 

sGET CHR2 FROM THE QUE, DATA.VALID INTO N FLAG. 
sEXIT WITH “SUCCESS” IF CHR1 WAS LAST IN QUE. 
sREMOVE INACTIVE BITS FROM CHR2 VALUE. 

sGET THE EXP1 VALUE. 

sREMOVE INACTIVE BITS FROM EXP1 VALUE. 

sCOMPARE CHR2 AND EXP1. 

sEXIT WITH “FAILURE” IF CHR2 <> EXP1. 


; It is likely that we received an extra character within the data pattern. 


; Indicate “success” and exit. 
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- CHKEXT - 





GLOBAL SUBROUTINE 


pee 


3239 027414 
3240 027416 


3246 027420 

3247 

3248 027422 
027422 

3249 027424 


000261 
000401 


000241 


004736 
000207 





50$: SEC sSET THE SUCCESS FLAG. 
BR 608 sEXIT THE ROUTINE. 





3 
3 We didn’t receive a single extra character at this point in the data pattern. 
i; Indicate “failure” and exit. 


:- 
52$: CLC sCLEAR THE SUCCESS FLAG. 
60$: PASS sRESTORE GPRS. 
JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC sCARRY - SET IF SUCCESS (EXTRA CHAR RXED). 
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GLOBAL SUBROUTINE - CHKLOS - 


SEQ 0087 





3251 -SBTTL GLOBAL SUBROUTINE - CHKLOS - 
3252 5 ++ SHORSEEOEEEEE OEE 6D 6646S OE EE OE EOE DOE OEOREE EE 1406 000000000000000008008 
3253 34 - Check For Lost Character Routine - 
3254 3* This subroutine checks for the condition which indicates that e cher 
3255 i hes been “lost” from the looped back data pattern during a transmission 
3256 ;* and reception test. If this routine determines thet it is likely that 
3257 3* @ cheracter has been lost, it indicates this in the status information 
a i returned to the calling routine. 
;* 
3260 ;# INPUTS: R3 - RX line number multiplied by 2 (offset into word tables). 
3261 ;* R4 - Base address of resync que containing RX chars. 
3262 ;* RS - Mask of “inactive” (non-data) bits of RX and TX chars with 
3263 i* ell set bits in a single, left justified group. 
3264 :* CHCNTB - Base of number of chars to Ix on each line table. 
3265 ;* RXCNTB - Base of the RX character counters table. 
3266 3% RXPTRB - Base of the RX character pointers table. 
pes? 1é TXRXLB - Base of TX/RX line number association table. 
;* 
a4 ;* OUTPUTS: CARRY - Set if lost character condition is verified. 
7% 
aere 3* CALLING SEQUENCE: JSR PC ,CHKLOS 
;* 
3273 s* COMMENTS: The following symbols are used in line comments: 
3274 34 CHRO - Cheracter at bottom of resync que (first received). 
3275 3* CHR1, CHR2 - 2 characters received after CHRO. 
3276 3% EXPO - Character expected to be received next. 
hh 3* EXP1, EXP2 - Character expected to be received after EXPO, etc. 
;* 
3279 +* SUBORDINATE ROUTINES CALLED: None. 
3280  Pelellecadateadedadeceeeeehee tht tet ELLE LLL LLL LLL Titi TTT TTT TT TTT TT Tere tt 
3281 027426 CHKLOS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
027426 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3282 027432 016301 003712 MOV RXCNTBC(R3),R1 sCOMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 
3283 027436 005201 INC R1 ; WITH THE EXPECTED NUMBER OF CHARS TO RX ON 
3284 027440 016300 005364 MOV TXRXLBC(R3),RO ; LINE CNUMBER TXED AND LOOPED BACK) TO 
3285 027444 016002 003612 MOV CHCNTB(RO),R2 ; DETERMINE IF THE POSSIBLE LOST CHAR 
3286 027450 020102 CMP R1,R2 ; WOULD BE THE LAST EXPECTED RX CHAR. 
3287 027452 001423 BEQ S2$ sEXIT WITH “FAILURE” IF LOST CHR WOULD BE LAST. 
3288 027454 005201 INC R1 sDETERMINE CAS ABOVE) IF CHRO WOULD BE THE LAST 
3289 027456 160201 SUB R2,R1 ; RX CHAR AND SAVE RESULT FOR LATER. 
3290 027460 016302 003552 MOV RXPTRB(R3),R2 sGET THE RX DATA POINTER. 
3291 027464 005202 INC R2 sCALCULATE POINTER TO EXP1 LOCATION. 
3292 027466 112200 MOVB (R2)+,RO ;GET EXP1 VALUE FROM DATA PATTERN. 
3293 027470 162400 SUB (R4)+,RO sCOMPARE CHRO AND EXP1 VALUES. 
3294 027472 040500 BIC RS,RO sREMOVE INACTIVE BITS FROM RESULT. (NO ACTIVE 
3295 ; BITS ALLOWED TO LEFT OF ANY INACTIVE BITS.) 
3296 027474 001012 BNE S2$ sEXIT WITH “FAILURE” IF CHRO <> EXP1. 
3297 027476 005701 TST R1 ;CHECK CHRO TEST RESULT SAVED ABOVE. 
3298 027500 001406 BEQ 50$ sEXIT WITH “SUCCESS” IF CHRO IS LAST CHAR. 
3299 027502 011401 MOV (R4),R1 sGET CHR1 FROM THE QUE, DATA.VALID INTO N FLAG. 
3300 027504 100004 BPL $ sEXIT WITH “SUCCESS” IF CHRO WAS LAST GUE CHAR. 
3301 027506 111200 MOVB (R2),RO ;GET THE EXP2 VALUE FROM THE DATA PATTERN. 
3302 027510 160001 SUB RO,R1 sCOMPARE THE EXP2 AND THE CHR1 VALUES. 
3303 027512 040501 BIC R5,R1 sREMOVE INACTIVE BITS FROM RESULT OF COMPARE. 
3304 ; (NO ACTIVE BITS LEFT OF INACTIVE BITS.) 
coos 027514 001002 BNE 52$ sEXIT WITH “FAILURE” IF CHR1 <> EXP2. 


c— 
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- CHKLOS - 





GLOBAL SUBROUTINE 


3311 027516 
3312 027520 


is 027522 


3320 027524 
027524 
3321 027526 


000261 
000401 


000241 


004736 
000207 











SEQ 0088 


3¢ 
; It is likely that we lost a character from the date pattern. 
; Indicate “success” and exit. 


i 
50$: SEC sSET THE SUCCESS FLAG. 
BR 60$ sEXIT THE ROUTINE. 


3¢ 
; We didn't lose a single extra character at this point in the data pattern. 
3; Indicate “failure” and exit. 


- 
52$: CLC sCLEAR THE SUCCESS FLAG. 
60$: PASS sRESTORE GPRS. 
JSR PC ,A(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC sCARRY - SET IF SUCCESS (LOST CHAR LIKELY). 
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GLOBAL SUBROUTINE 


en 


027530 
027530 
027534 


027540 
027544 
027550 
027552 
027554 


027556 
027562 


027562 
027564 


004537 
052701 


012703 
062701 
103402 
006203 
000773 


010337 


004736 
000207 


005474 
177740 


177400 
000010 


002366 


- CHRMSK - 


-SBTTL GLOBAL SUBROUTINE 
FO % SROSEOEEEEOEEE E6064 66600 6004000006 060600 060000060000000006000000000000008 


- CHRMSK - 


3@ - Form a Bit Mask of Unused TX/RX Bits Routine - 

34 This subroutine constructs a bit mask of character bits which are not 
34 used during transmission and reception. This mask cen be used 

:* to remove the flags, line number, DATA.VALID bits, and unused data bits 
34 from e character word which has been read from the DUT FIFO. 

3* 

3* INPUTS: Ri - DUT LPR contents used to determine character length. 

;* 

3# OUTPUTS: IBM - Bit mask of unused TX/RX bits Cincluding upper byte): 
34 Examples: 177400 returned for 8 bits/cher. 

34 177700 returned for 6 bits/chaer. 

3% 

3# CALLING SEQUENCE: JSR PC, CHRMSK 

;* 

;* COMMENTS: If this mask is to be used to just remove the inactive bits 
34 within the date byte of a word read from the DUT FIFO, the 

34 upper byte of the mask must be cleared. 


;* 
;# SUBORDINATE ROUTINES CALLED: None. 
 aliallachatiatndiacathtntntnthtehtaetaeaee ttt ttt LLL LLL LLL LLL it TTT TTT TTT tT TTT ttt 


CHRMSK:: SAVE 
BIS 


2s: ADD 


4$: MOV 
60$: PASS 


JSR 
#177740,R1 
#177400,R3 
#10,R1 
as 
R3 
es 
R3, 16M 

JSR 
PC 





sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sPREPARE TO COUNT BITS SHIFTED INTO MASK BY 

s_ USING THE LPR BITS/CHAR FIELD CONTENTS. 
sCLEAR THE UNUSED BIT MAP LOWER BYTE. 
sDETERMINE IF ANOTHER BIT WOULD BE TOO MANY. 
sEXIT THE SHIFT LOOP IF IT WOULD BE TOO MANY. 
sSHIFT A BIT INTO THE UNUSED BIT MASK LOW BYTE. 
sLOOP TO CHECK FOR DONE. 


sLOAD THE INACTIVE BITS MASK STORAGE IN MEMORY. 
sRESTORE GPRS. 


PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 





SEQ 0089 












3414 
3415 


027566 
027566 


027572 
027600 


027602 
027606 
027610 
027612 


027616 
2 


027620 


004537 


036337 
001407 


012701 


005474 


002534 


022470 


100000 


003552 
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- CKCHR - 
.SBTTL GLOBAL SUBROUTINE 


see BO66 0666666666 066060606 06060666 6600000000000 06006000000000000600000000000008 


34 - Check Character For Errors Routine - 

34 This subroutine checks the character at the bottom of the resync queue 
3% to determine if it is correct. Pointers and counters which ere related 
3% to the reception of the character ere updated. If the cheracter is 

3@ incorrect, an analysis of the error is done and perameters ere set up 
3@ for the reporting of the correct error. 

3* 

3* INPUTS: R3 - Line offset for access of word tables of line veriables. 
3% R4 - Base address of the resync queue for this line. 

34 RS_- Mask of the inectives bits in a TX or RX cher byte. 

14 BITTBL - Table of words with bits set for use in forming maps. 
pe DPRSQ - Date Pattern Resync Que with velid cher et botton. 

34 EXCNTB - Base of the extre character couters table. 

pe RXDONF - Receive done flags. 

34 RXPTRB - Base of the RX character pointers table. 

3% Error Messuge Labels - EM9007,EM9008 ,EM9027, EM9028 

3* 

3# OUTPUTS: R1 - Contains the address of the error message to be reported. 
3% R2 - Contains the actual received data. 

34 R4 - Conteins the expected date. 

3 CARRY - “Success” flag (set if no error is found). 

3% Following veriebles updated for line on which char wes received: 
3% EXCNT - Count of the number of extre chars received on line. 
36 RXCNT - Count of the number of characters received on line. 

34 RXPTR - Updated to point to the next expected cher on line. 

3% ERRBLK - Contents destroyed. 

3% 


3# CALLING SEQUENCE: JSR 


* 
3@ COMMENTS: 


3s 
s# SUBORDINATE ROUTINES CALLED: CHKEXT,CHKLOS, UPDCHR. 
i-- $O6666666666666666666666666666 0600000060606 6606006000000000600666806000000008 


CKCHR:: SAVE 


i¢ 
s Check for the RX of a cher after RX should be complete on this line. 


; BIT 
BEQ 


3¢ 


s We heave received en extra character on this line. 

+ Set up for error report and exit to report the error. 

; Count the extre character. 

s Exit to report “UNEXPECTED CHAR RECEIVED AFTER RX COMPLETE ON LINE nn” 


g- 
MOV 
MOV 
BIC 
BIS 
BR 


3¢ 
s Get the pointer to the next expected receive date cheracter. 


ge 
2s: MOV 






- CKCHR - 































PC ,CKCHR 








sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 







BITTBLC(R3) ,RXDONF sTEST THE RX DONE FLAG FOR THIS LINE. 
2s sSKIP ERROR REPORT IF RX NOT COMPLETE ON LINE. 











@€M9007 Ri sSELECT “EXTRA CHAR ON LINE” ERROR MESSAGE. 
(R4),R2 sGET THE ACTUAL DATA FOR ERROR REPORT. 

RS ,R2 sREMOVE THE INACTIVE BITS. 

#BIT15,R4 sINDICATE “NONE” EXPECTED DATA FOR ERROR RPT. 
12$ sGO COUNT EXTRA CHAR AND EXIT WITH “FAILURE”. 







RXPTRBCR3) .R2 





a 


3450 027674 
3451 027700 


3470 027726 
3471 0277350 
3472 027732 


004737 
103012 


012701 


010002 
010104 
012701 
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- CKCHR - 





037370 


027326 


023433 


027426 


023513 


037370 





7¢ 
s Compere the actual data with the expected dete. 
| ad 

MOV CR4),RO sGET THE ACTUAL DATA. 


BIC RS ,RO sREMOVE THE INACTIVE BITS. 

MOVE (R2),R1 sGET THE EXPECTED DATA. 

Bz RS.R1 sREMOVE THE INACTIVE BITS. 

CMPB =RO,R1 sCOMPARE ACTUAL AND EXPECTED. 

BNE 4s sCHECK FURTHER IF DATA MISCOMPARE. 

JSR PC ,UPDCHR sUPDATE PTRS AND COUNTERS FOR THE CHAR. 
BR 50$ sEXIT WITH “SUCCESS”, NO ERROR FOUND. 


3¢ 
s Actual and expected date miscompere. 


s Determine if it's likely we received en extre cher within the date pettern. 


sCHECK FOR EXTRA CHAR RX‘ED IN PATTERN. 
sGO CHECK FOR LOST CHAR IF NO EXTRA CHAR. 


3¢ 

; It is likely that we received en extre cheracter within the date pettern. 
+ Count the cher es an extra char, don't count es e stenderd cher. 

i Report “EXTRA CHAR RECEIVED WITHIN DATA PATTERN ON LINE nn” 


ge 
MOV @€M9027,R1 sSELECT “EXTRA CHAR ON LINE” ERROR MSG. 
MOVB (R2),RO sGET THE EXPECTED RECEIVE DATA 


3 - 
4%: JSR PC ,CHKEXT 
Bcc 6% 


BIC RS RO sREMOVE THE INACTIVE BITS FROM EXPECTED DATA. 
MOV (R4),R2 sGET THE ACTUAL RECEIVE DATA. 

BIC RS ,R2 sREMOVE THE INACTIVE BITS FROM ACTUAL DATA. 
MOV RO,R4 sPASS EXPECTED DATA TO ERROR REPORT ROUTINE. 
BR 12% sGO0 COUNT EXTRA CHAR AND EXIT WITH “FAILURE”. 


3° 
s Actual end expected date miscompere. 

+ Not likely thet we received en extre cheracter within the dete pettern. 
s Determine if it’s likely we lost e character from the dete pettern. 


R= 
6$: JSR PC ,CHKLOS sCHECK FOR A LOST CHAR CONDITION. 
Bcc 8$ sGO REPORT BAD RX DATA IF NOT LOST CHAR. 


3¢ 

s It io likely that we lost e@ character from the dete pattern. 

+ Count the cher in the RX cher count es if it hed been received. 

s Also, count CHRO es e valid cher, because we heve verified it ebove. 
s Report “SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE nn” 

i- 


MOV @€M9028,R1 sSELECT “LOST CHAR ON LINE” ERROR MSG. ttttt 
MOVB (R2),RO sGET THE EXPECTED RECEIVE DATA. 

BIC RS ,RO sREMOVE THE INACTIVE BITS FROM EXPECTED DATA. 
MOV (R4),R2 sGET THE ACTUAL RECEIVE DATA. 

BIC RS .R2 sREMOVE THE INACTIVE BITS FROM ACTUAL DATA. 
MOV RO,R4 sPASS EXPECTED DATA TO ERROR REPORT ROUTINE. 
JSR PC ,UPOCHR sUPDATE PTRS AND COUNTERS FOR THE CHAR. 

BR 10% sGO EXIT WITH “FAILURE’. 


t¢ 
s Did not lose or gein e single cherecter from/to the dete pettern. 
s Report “RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE nn* 

t- 


88: MOV RO,R2 sPASS ACTUAL DATUM TO ERROR REPORT ROUTINE. 
; MOV R1,R4 sPASS EXPECTED DATUM TO ERROR REPORT ROUTINE. 
MOV @€9008 ,R1 sSELECT THE “DATA MISCOMPARE” MESSAGE. 









— RS 
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GLOBAL SUBROUTINE - CKCHR - 
3473 3° 
ode, s Update the cherecter counter and RX date pattern pointer for this line. 
_ 
3476 027736 004737 037370 108: JSR PC ,UPOCHR sUPDATE RX PTR AND COUNTER FOR THIS LINE. 
od 027742 000405 BR 143 sGO EXIT WITH “FAILURE”. | 
3° 
ode ; Count the cherecter es an extra cheracter. 
t- 
3481 027744 005263 003412 12$: INC EXCNTBC(R3) sINCREMENT THE EXTRA CHAR COUNT FOR THIS LINE. 
3482 027750 001002 BNE 143 sEXIT WITH FAILURE IF NO OVERFLOW. 
oe 027752 005363 003412 DEC EXCNTB(R3) sDECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW. 
3° 
3485 . ; Indicete “failure” and exit. 
2486 37 
3487 027756 000241 148: cic sCLEAR THE “SUCCESS” FLAG. 
re 027760 000401 BR 60$ sEXIT THE ROUTINE. 
3490 3° 
3491 ; No error was found. 
ote 4 ; Set “success” flag and exit. 
9 
ote 027762 000261 50$: SEC sSET THE “SUCCESS” FLAG. 
3496 027764 6038: PASS R1,R2,R4 sRESTORE GPRS, EXCEPT 
027764 010166 000004 MOV R1,R1SLOTC SP) ;PUT Ri IN STACK SLOT. 
027770 010266 000006 MOV R2,R2SLOTC( SP) sPUT R2 IN STACK SLOT. 
027774 010466 000012 MOV R4,R4SLOT( SP) ;PUT R4& IN STACK SLOT. 
030000 004736 JSR PC ,8(SP)-+ s;RETURN TO PREGOS SUBRT. 
3497 sR1 - CONTAINS THE ADDRESS OF THE ERROR REPORT. 
3498 sR2 - CONTAINS THE ACTUAL DATA RECEIVED. 
3499 3R4 - CONTAINS THE EXPECTED DATA. 
3500 030002 000207 RTS PC 





—— 








GLOBAL SUBROUTINE 


3531 030004 
030004 


3536 030010 
3537 030012 
3538 030014 
3539 030.20 


3543 030022 
3544 030024 


3549 030026 
3550 030032 
3551 030040 


004537 


010203 
000303 
042703 
006303 


005702 
100021 


016301 
036137 
001013 





005474 


177760 


005364 
002534 002272 


- LL Sco 
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- CKINAC - 


-SBTTL GLOBAL SUBROUTINE - CKINAC - 

yee SEOSOEEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEOEOEOEOEOEO4NEOEOEEEEEEEEEEEEEEEEEEAE 
36 - Check for New Character on Inactive Line Routine - 

34 This subroutine checks a cheracter to determine if the character 

34 was received on an active line. If tne character was received on 

3a an inactive line this routine records the fact that the character 

3@ was received on an inactive line, prepares an error message for 

34 the calling routine, and returns e “failure” status. 

34 

3@ INPUTS: R2_- The RX character including error flags and line number. 
34 ACTLNS - Bit map of active DUT lines. 

34 BITTBL - Table of words with bits set for forming bit maps. 
36 EM9006 - Lebel at “RX ON INACTIVE LINE” error messge. 

34 EXCNTB - Base of the extra character couters table. 

34 TXRXLB - Base of TX/RX line number association table. 

34% 

3# OUTPUTS: CARRY - “Success” flag (set if no error found). 

34 Rl - If error found, address of error message. 

34 R3 - Line number offset of passed in character. 

pa R4 - If error found, expected date indication for error rpt. 
3¢ EXCNT - Extra character count for line (Updated if error). 
34 

3# CALLING SEQUENCE: JSR PC ,CKINAC 

34 

;@ COMMENTS: 


34 
3# SUBORDINATE ROUTINES CALLED: NONE. 


t-- SOREOEEEEEEESEERESAEEASEARESERALEAAAEEEESERASEESALESEREEEEEEREREREDADEEEEEEE 


CKINAC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


3° 

; Extract the line number from the passed in character and use the line 
+ number to form an offset for accessing tables of line variables. 

on 


MOV R2,R3 sEXTRACT THE LINE NUMBER 

SWAB R3 3 FROM THE CHARACTER WE 

BIC #177760,R3 ; ARE COMPARING. 

ASL R3 sFORM OFFSET INTO WORD TABLE FROM LINE NUMBER. 


3° 
; If the character in question is not a valid character, exit with “success”. 


ae 
TST R2 sCHECK DATA.VALID BIT. 
BPL 50$ sEXIT WITH SUCCESS IF CHAR IS NOT VALID. 


3? 
; If the TX line which is associated with this RX line is an active line, 
+; exit the routine with “success”. 


3° 
MOV TXRXLBC(R3),R1 sGET THE TX LINE @ OFFSET FOR THIS RX LINE. 
BIT BITTBLC(R1),ACTLNS ;DETERMINE IF TX LINE IS AN ACTIVE LINE. 
BNE 50$ sEXIT ROUTINE WITH SUCCESS IF LINE IS ACTIVE. 

3? 

; The character in question was received on an inactive line. 

; Count this character as an extra cher. 

Set up error information. 

txit routine with “failure” indication. 
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SEQ 0094 
GLOBAL SUBROUTINE - CKINAC - 
3558 030042 005263 003412 INC EXCNTB(R3) sINCREMENT THE EXTRA CHAR COUNT FOR THIS LINE. 
3559 030046 001002 BNE 2s sSKIP SETTING TO MAX VALUE IF NO OVERFLOW. 
3560 030050 005363 003412 DEC EXCNTBC(R3) sDECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW. 
3561 030054 012701 022415 23: MOV 9E€M9006 ,R1 sSET UP RX ON INACTIVE LINE MESSAGE. 
3562 030060 012704 100000 MOV OBIT15,R4 sSET UP “NONE” EXPECTED DATA INDICATION. 
3563 030064 000241 cLc ;CLEAR THE “SUCCESS” FLAG. 
ines 030066 000401 BR 60$ 3GO REPORT RX CHAR ON INACTIVE LINE. 
3566 3* 
3567 3 We have not found e “char on inactive line” error situation. 
os ; Set the “success” flag and exit the routine. 
a. 
core 030070 000261 50$: SEC sSET THE “SUCCESS” FLAG. 
3572 030072 60$: PASS R1,R3,R4 sRESTORE GPRS, EXCEPT OUTPUT GPRS. 
030072 010166 000004 MOV R1,R1SLOTC SP) sPUT Ri IN STACK SLOT. 
030076 010366 000010 MOV R3,R3SLOT( SP) sPUT R3 IN STACK SLOT. 
030102 010466 000012 MOV R4,R4SLOT( SP) ;PUT R4& IN STACK SLOT. 
030106 004736 JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 


3573 030110 000207 RTS PC sCARRY - SUCCESS FLAG (SET IF NO ERROR). 
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GLOBAL SUBROUTINE 


3598 030112 

030112 
3599 030116 
3600 030122 
3601 030124 
3602 030130 
3603 030132 
3604 030134 
3605 030136 

030136 
3606 030140 


—— 


004537 
005037 
011011 
005737 
000261 
001401 
000241 


004736 
000207 


005474 
002424 


002424 


















SEQ 0095 


- CKTRAP - 
-SBTTL GLOBAL SUBROUTINE - CKTRAP - 
SPRSSAASAESEEEES ES ERESEEREDAEEEEEEDED OE OEEDEDEDEEOEOO464604000006000006000008008 
34 Check Trap Routine - 
1e This subroutine is used to check for ae bus time-out trap (004 trap) 
:* which is caused by an access to a non-existent memory or I/0 location. 
7 If the trap does not occur, this routine returns a success indication. 
3% 
3;@ INPUTS: RO - Source address for move. 
34 Ri - Destination address for move. 
34 (RO) - Seurce for the move. 
34 
3@ OUTPUTS: (R1) - Written to the contents of (RO). 
34 Carry flag - Set on return if no 004 trap detected. 
34 TP4FLG - Nonzero if trap occurred, cleared otherwise. 
fa 
3* CALLING SEQUENCE: JSR PC ,CKTRAP 
;* 
3@ COMMENTS: If this subroutine causes a trap, either the address which 
34 is labeled ADRPTR will be the trap PC address on the stack. 
3* 


s# SUBORDINATE ROUTINES CALLED: None. 
i PROSRARESSEREEEEEEE SEARED ES EREEAED DEED ED EEEEEE OE EEOEEE EOE ODED ODED DEED OE EEEEE 


CKTRAP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
CLR TP4FLG sCLEAR THE 004 TRAP FLAGS. 
MOV CRO),CR1) sPERFORM THE MOVE IN QUESTION. 
ADRPTR:: TST TP4FLG sCHECK FOR OCCURENCE OF TRAP. 
SEC sINDICATE SUCCESS. 
BEQ 60$ sEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 
CLC sINDICATE FAILURE. 
60$: PASS sRESTORE GPRS. 
ave - JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
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GOBAL SUBROUTINE 


3634 030142 
030142 


3636 030146 
3637 030152 
3638 030154 
3639 030160 
3640 030162 
3641 030164 
3642 030166 

030166 
3643 030170 


004537 


005037 
111011 
005737 
000261 
001401 
000241 


004736 
000207 


005474 
002424 
002424 



















SEQ 0096 
- CKTRPB - 
-SBTTL GOBAL SUBROUTINE - CKTRPB - 
PACER OREE EEE EE EEE EE ED DEED EEEEOEOEED OE EEEEEEEEEEODOEODOEEEEEEEEEEEEEEEEEEES 
4 - CHECK FOR TRAP - 
34 THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 
;@ WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/0 LOCATION 
;¢ IF A TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 
3* 
34 INPUTS: RO - SOURCE ADDRESS FOR MOVE 
74 Ri - DESTINATION ADDRESS FOR MOVE 
34 (RO) - SOURCE FOR THE MOVE 
;* 
3% OUTPUTS: (R1) - WRITEN TO THE CONTENTS OF (RO) 
;4 CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED 
38 TP4FLG - NONZERO IF TRAP OCCURED, CLEARED OTHERWISE. 
7k 
34 CALLING SEQUENCE: JSR PC ,CKTRPB 
3% 
;¢ COMMENTS : IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS 
3@ WHICH IS LABELED TRPAD2 WILL BE THE TRAP PC ADDRESS ON 
34 THE STACK OR SOME OTHER ADDRESS WHICH WAS PLACED ON 
3% THE STACK BY AN UNEXPECTED TRAP. 
;* THIS ROUTINE PERFORMS A BYTE MOV . 
3* 
3* SUBORDINATE ROUTINES CALLED: NONE . 
FEREREEEEAEAEAEESAEESASASESAAEREEREEEAEREAASEAEREASEARESEREEREREEAEAREEREREALES 
CKTRPB: : SAVE 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
CLR TP4FLG s;CLEAR THE 004 TRAP FLAGS 
MOVB CRO),CR1) sPERFORM THE BYTE MOVE 
TRPAD2:: TST TP4FLG sCHECK FOR OCCURENCE OF TRAP 
SEC sINDICATE SUCCESS 
BEQ 60$ sEXIT WITH SUCCESS IF TRAP DID NOT OCCUR 
CLC : INDICATE FAILURE 
60$: PASS ; 
JSR PC,A(SP)-+ sRETURN TO PREGOS SUBRT. 


RTS PC sRETURN 
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GLOBAL SUBROUTINE 


—— 


030172 
030172 


030176 
030202 


030204 
030210 
030210 
030210 


030212 


004537 


004737 
103002 


004737 


004736 
000207 


005474 


034530 


032722 





- CLNRST - 


-SBTTL GLOBAL SUBROUTINE 


- CLNRST - 


3 SEREREESEESESEREE SEED EEEESEEESESEEEEEEEEE DD OSOEOSOOOD OE OOO4O4000000000640644484 


- Clean Reset of the Device Under Test - 


This subroutine is used to reset the DUT to a known state. 


The DUT's self-test is skipped,and 


the fifo is purged of any error 


codes, etc. 
If the reset does not succesfully complete, then the carry bit is 
passed back to the calling routine (clear). 


INPUTS: 


OUTPUTS: 


CALLING SEQUENCE: 
COMMENTS: 


CSRA - Contains the address of the CSR 

TXBFCA - Contains address of DUT DMA Buffer Count register. 
ERRNBR - Error number for possible error report. 

ERRTBL- ERRTYP,ERNBR,and ERRMSG set up correctly. 


The DUT performs its reset function into a known state. 
CARRY - Clear indicates the test is to be aborted. 

ERRBLK - value may be destroyed. 

IESTAT - TX and RX interrupt flags are cleared. 

TX and RX interrupt enable bits in the DUT’s CSR are cleared. 


JSR PC,CLNRST 


This subroutine can report errors with numbers ERRNBR. 
This routine does not destroy the value of ERRNBR. 


s* SUBORDINATE ROUTINES CALLED: DELAY,MSLGET,PUFIFO,RESETT. 
SPEER EEEEEEEESEEEES EEE ES EEES OO ODES ODES EEOE EE EEES ODED ESOS ODED ODED OEEEEEEEEEEES 


CLNRST:: SAVE 


3° 
; Reset the DUT. 


sSAVE CONTENTS OF GPRS RO THRU RS 


JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 


This routine reports errors with numbers from ERRNBR thru ERRNBR+2. 


JSR 
BCC 


Tat sRESET THE DUT TO A KNOWN STATE. 
$ 


sEXIT ROUTINE WITH ABORT TEST INDICATOR. 


3? 
; Purge the FIFO of error codes, save any BMP codes found. 


JSR 


60$: 


PASS 


RTS 


PC ,PUFIFO sPURGE THE FIFO. 
sEXIT THE TEST USING RESETT OR PUFIFO STATUS. 
sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
oe sCARRY BIT:IF CLEAR, THEN ABORT THE TEST. 





SEQ 0097 
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SEQ 0098 
GLOBAL SUBROUTINE - CLRI6W - 
3690 -SBTTL GLOBAL SUBROUTINE - CLRI6W - 
3691 b¢¢ SOSSSEEEEEEEEEEEEESSOOO6 0460046066 6006 0646 060000000000000000000000000000008 
3692 3* - Clear Sixteen Words Routine - 
ote ;* This subroutine clears 16 words starting with the specified word. 
;* 
rooe 3@ INPUTS: RO - Address of the first word to clear. 
3% 
ne 3* OUTPUTS: (RO) to (RO+15) - 16 words of memory ere cleared to 0. 
3* 
3699 3@ CALLING SEQUENCE: JSR PC, ,CLRi6W 
3700 3* 
3701 3 COMMENTS: 
3702 3* 
3703 +* SUBORDINATE ROUTINES CALLED: None. 
3704 lalla aetaeeehee eee t LLL TTL LTT TTT TTT TT TT TTT TTT TT TTT TTT eT eT eT 
3705 
3706 030214 CLRiI6W:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
030214 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3707 030220 012701 000020 MOV #16. ,R1 ;SET THE LOOP COUNTER TO 16. 
3708 030224 005020 2s: CLR (RO)+ ;CLEAR A WORD OF MEMORY. 
3709 030226 005301 DEC Ri ;COUNT THIS LOOP. 
3710 030230 001375 BNE 2$ ;LOOP IF NOT 16 WORD CLEARED. 
3711 020232 60$: PASS sRESTORE GPRS. 
030232 004736 JSR PC ,O(SP)+ sRETURN TO PREGOS SUBRT. 
3712 030234 000207 RTS PC 


r-— 
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SEQ 0099 
GLOBAL SUBROUTINE - CNTERR - 
3714 -SBTTL GLOBAL SUBROUTINE - CNTERR - 
3715 " gee SERREESEEEEEEEEEEEEEEEOD ODES EEEEEEEE EE 14 ODEO OEOEOE ES OE OD ONNOEOODEEEEEROREES 
3716 4 - Count Error Routine - 
3717 34 This subroutine is used to count a “data” error on the specified 
3718 ;* line. It checks whether error summary reporti is active, or should 
14 ;* be made active on this line, and activates it i necessary. 
3* 
3721 3* INPUTS: RS - Line number of line under consideration. 
3722 i* ERCNTB - Label at base of error counters table. 
3723 i* ERSMRF - Error summary flags (bit set if line in summary mode). 
Lea 34 NDERPT - Number of individual data errors to report on a line. 
;* 
3726 3# OUTPUTS: CARRY - Set if line is in error summary mode. 
3727 34 ERCNT - Error counter incremented for specified line. 
ee ;* ERSMRF - Bit set if line should be in summary mode. 
3* 
Ly, 3* CALLING SEQUENCE: JSR PC,CNTERR 
1 3% 
3732 3* COMMENTS: 
3733 3* 
3734 3# SUBORDINATE ROUTINES CALLED: None. 
3735 t-- SEREAEEEAEEEEREEEAEEEE ES EEEEEEEEEE ODED ESOS OS ESEEEEREEEEEE ODES EE EEEREEEEEEEES 
3736 
3737 030236 CNTERR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
syee 030236 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3¢ 
de ; Count the error on the counter for the specified line. 
40 * 
3741 030242 006305 ASL R5 sFORM WORD OFFSET FROM LINE NUMBER. 
3742 030244 016501 003452 MOV ERCNTBCRS),R1 sGET THE PRESENT ERROR COUNT FOR THIS LINE. 
3743 030250 005201 INC Ri a i COUNT ERROR. 
3744 030252 103402 BCS 2s sOVERFLOW? YES, DON'T UPDATE COUNTER IN TABLE. 
3745 030254 010165 003452 MOV Ri, ERCNTBCRS) sUPDATE ERROR COUNTER TABLE ENTRY. 
3746 030260 005737 002264 2s: TST NDERPT 
3747 030264 001411 BEQ 60$ sSUMMARYS DISABLED? YES, EXIT WITH CARRY 0. 
3748 030266 020137 002264 CMP R1,NDERPT s3NO, CHECK FOR ENOUGH ERRORS FOR SUMMARY USE. 
3749 030272 101002 BHI 4$ sENOUGH ERRORS TO USE SUMMARY? YES, GO HANDLE. 
3750 030274 000241 cLC sINDICATE NOT TO USE SUMMARY REPORT YET. 
3751 030276 000404 BR 60$ sEXIT WITH CARRY 0. 
3752 030300 056537 002534 002650 43: BIS BITTBLCRS) ,ERSMRF ;SET THE ERROR SUMMARY FLAG FOR LINE. 
3753 030306 000261 SEC sINDICATE TO USE SUMMARY REPORT. 
3754 030310 60$: PASS s;RESTORE GPRS. 
030310 004736 JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
3755 030312 000207 RTS PC 


r-— 
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GLOBAL SUBROUTINE - CONMAP - 
















SEQ 0100 


3757 -SBTTL GLOBAL SUBROUTINE - CONMAP - 
3758 see SEREEEEEOEEEEE EE O6 646606060604 06 0066060606 06000004000000 006000080000 0000004 
3759 34 - Convert Line bit map. 
3760 ;* This subrouitne is used to convert a bit map passed to it , into 
3761 :* another line bit map that is based upon the associated TX/RX line 
3762 ;* number /offset table. 
3763 34 
3764 ;@ INPUTS: RS - Contains the line bit map to be transformed. 
one ;4 TXRXLB - Base address of associated TX/RX line number table. 
;* 
has ;* OUTPUTS: RS - Contains an assosciated line bit map. 
;* 
pee 3# CALLING SEQUENCE: JSR PC , CONMAP 
0 ;* 
3771 ;* COMMENTS: The TX/RX association table must be initialised before this 
3772 ;* routine is called. 
3773 i* 
3774 3# SUBORDINATE ROUTINES CALLED: NONE. 
3775 3-- SEREEEEREEEEEEEEEAEEEE EDGE EE OE OEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEEEEEEEEE 
3776 
3777 030314 CONMAP : : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

030314 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3778 030320 012702 005364 MOV #TXRXLB,R2 sGET THE BASE ADDRESS OF THE LINE ASSOC TABLE. 
3779 030324 010503 MOV RS,R3 ;COPY THE BIT MAP TO BE TRANSFORMED. 

3780 030326 012704 000010 MOV @NUMLNS , R4 ;SET MAX LINE COUNTER. 

3781 030332 005005 CLR RS sCLEAR ASSOCIATED LINE BIT MAP. 

3782 030224 006203 2s: ASR R3 sSHIFT ACTLNS BIT MAP INT BOOLEAN REGISTER. 
3783 030336 103005 BCC 4$ sSKIP SETTING ASSOCIATED LINE NUMBER BIT MAP. 
3784 030340 011201 MOV CR2),R1 sGET ASSOCIATED LINE NUMBER OFFSET FROM TABLE. 
3785 030342 006201 ASR Ri sSHIFT RIGHT TO GET LINE NUMB FROM OFFSET. 
3786 030344 004737 031646 JSR PC ,LINBIT sGENERATE AN SINGLE BIT MAP FOR THIS LINE. 
3787 030350 050005 BIS RO,RS sSET BIT FOR THIS LINE IN ASSOCIATED BIT MAP. 
3788 030352 005722 4$: TST (R2)+ sINCREMENT ADDRESS FOR THE NEXT LINE NUMBER. 
3789 030354 005304 DEC R4 sDECREMENT LINE COUNT. 

3790 030356 001366 BNE 2s ;LOOP IF NOT DONE. 

3791 030360 60$: PASS RS sRESTORE GPRS, EXCEPT 

030360 010566 000014 MOV RS ,RSSLOTC( SP) ;PUT RS IN STACK SLOT. 

030364 004736 JSR PC ,@(SP)+ s;RETURN TO PREGOS SUBRT. 
3792 sRS - CONTAINS THE ASSOCIATED LINE BIT MAP. 
3793 030366 000207 RTS PC 


— 
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—— 


3821 


3822 
3823 
3824 


030370 
030370 
030374 
030376 
030402 
030404 
030410 
030414 
030416 
030422 
030422 
030424 


030426 


177777 


005474 
177777 


030426 
032042 


032412 

















SEQ 0101 


- DELAY - 
-SBTTL GLOBAL SUBROUTINE - DELAY - 
ERROR EEEAEEEEEE ED EEEEEEEEDEEEEEEEOE ODED OE 06 O6060000062000904000604600000000008 
34 - DELAY SUBROUTINE - 
34 This subroutine is used to delay a variable number of milli-seconds. 
;* 
;* INPUTS: R4 - Contains the number of ms to delay. 
3* MSLCNT. 
;* 
3* OUTPUTS: None. 
;* 
3* CALLING SEQUENCE: JSR PC ,DELAY 
3;* 
3* COMMENTS: If no hardware clock interrupts are occuring, control-Cs will 
3* not be honored for the duration of the delay. 


7* 
;# SUBORDINATE ROUTINES CALLED: None. 
FERRARA AEEEEEESESESESSEREREEERERESEEEEESEEEEEEEEEEEAEEEEEEDEEEEDEREREALEERELES 


DELAY:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;sCALL REGISTER SAVE SUBRT. 


MOV R4,R1 sPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

MOV #-1,R2 sTELL MSLOOP ROUTINE TO CHECK ALL BITS. 

CLR R3 ;sTELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

MOV 62% ,R4 sTELL MSLOOP TO CHECK DUMMY NON-ZERO WORD. 

JSR PC ,MSLOOP sDELAY THE REQUESTED @ OF MS. 

BCC 60$ sEXIT ROUTINE IF WE TIMED-OUT.) 

JSR PC OOPS sIF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 
60$: PASS sRESTORE GPRS. 

oe - JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 


62$: -WORD -1 sDUMMY, NON-ZERO WORD. 
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SEQ 0102 


3826 -SBTTL GLOBAL SUBROUTINE - DM16B - 
3827 tee SESECEEEEEEEEE OE $606 66 066006000066606 06 060000000006060000066000600000080008 
38628 3* - CONVERT TO A 16-BIT PHYSICAL ADORESS - 
3829 3 THIS ROUTINE CONVERTS FROM PAR FORM TO A 16-BIT PHYSICAL ADDRESS, 
sone 3* OF ALTERNATE 1'S AND O'S. 
;* 
oese 3# INPUTS: DMTSTA: - CONTAINS THE ADDRESS IN PAR FORM 
3% 
ooes 3 OUTPUTS: RO - CONTAINS THE 16 BIT PHYSICAL ADDRESS 
;* 
oes 34 CALLING SEQUENCE : JSR PC ,OM168 
7* 
eos i* COMMENTS : USED IN THE DMA ADDRESS TEST 
3* 
3840 34 SUBROUTINES CALLED: NONE . 
3841 i-- SECREEEEEEEEEEEDOD E444 06066666606666000606 0000000000 66060606000000000008 
3842 
3843 030430 DOM16B:: SAVE 
030430 004537 005474 JSR RS ,PREGOS ;sCALL REGISTER SAVE SUBRT. 
3844 030434 013700 002432 MOV DMTSTA,RO sSHIFT THE DMA TEST ADDRESS 
3845 030440 012702 000006 MOV 06 ,R2 sSIX PLACES LEFT , TO 
3846 030444 006300 2s: ASL RO sCONVERT IT INTO A, 
3847 030446 005302 DEC R2 316-BIT PHYSICAL ADDRESS 
seed 030450 001375 BNE 2s ; 
3850 030452 012701 000052 MOV #52,R1 sSET UP THE 6 LSB’S 
3851 030456 032700 000100 BIT #100 ,RO sIF BIT #6 OF THE PHYSICAL 
3852 030462 001402 BEQ 4s sADDRESS IS CLEAR THEN BRANCH 
Pos 030464 012701 000025 MOV #25,R1 sOTHERWISE CORRECT THE LSB’‘S 
ae 030470 060100 4$: ADD R1,RO sMREGE THE LSB‘S WITH THE PHY ADOR 
3857 030472 PASS RO sRETURN WITH THE PHY ADOR. 
030472 010066 000002 MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
030476 004736 JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
eed 030500 000207 RTS PC 


an 








3900 030502 
030502 

3901 

3902 030506 

3903 030510 

3904 030514 

3905 030516 


3906 

3907 030522 
3908 030524 
3909 030532 
3910 

3911 

3912 030536 
3913 030544 
3914 030546 
3915 030552 
3916 030560 


140025 
000001 151704 
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-SBTTL GLOBAL SUBROUTINE 







50+ SO666660060006066660600606 6600000000 0600000060000000000000000000000000000000 
- READ/WRITE DATA FROM/TO (OMTSTA) - 


34 THIS ROUTINE READS DATA BYTES FROM OR WRITES DATA BYTES TO AN ADDR OF 
$6 ALTERNATE 1'S AND 0’S . BITS 21 TO 6 OF THE ADOR ARE CONTAINED AT 

3* DMTSTA. THE ROUTINE APPENDS THE 6 LSB’S TO PRODUCE AN ADOR OF ALTERNATE 
34 1'S AND 0’S. THIS ROUTINE IS CALLED FROM THE DMA ADDRESS TEST. 

i& 

3@ INPUTS: RO - ADDRESS OF THE DATA TO BE WRITTEN TO (DMTSTA), 

3% IF A WRITE IS SPECIFIED. 

3% Ri - ADDRESS OF THE AREA IN WHICH DATA FROM COMTSTA), 
3% IS TO BE SAVED,IF A READ IS SPECIFIED. 

34 R3 - NUMBER OF DATA BYTES TO BE READ/WRITTEN 


s# OUTPUTS: 


CLEAR , SPECIFIES A READ FROM (DMTSTA) 
SET , SPECIFIES A WRITE TO (DMTSTA). 


DMTSTA - CONTAINS BITS 21 TO 6 OF THE ADOR. 
MMSRO - ADDRESS OF MEM MGT STATUS REG @0 
MMPRES - BIT #0 SET, INDICATES MEM MGT PRESENT 
PARA6 - ADDRESS OF MEM MGT PAR 06 

TP4FLG - 004 TRAP FLAGS 





DATA AT COMTSTA) SAVED OR WRITTEN 

PAR #6 - CONTENTS SET TO CONTENTS OF DMTSTA 
TP4FLG - CLEAR IF READ/WRITE SUCCESSFUL 
SET IF FAIL. 


s# CALLING SEQUENCE: 


4 
3# COMENTS: 


OMRW:: SAVE 


MOV 

TST 
BNE 
JSR 


6$: MOV 





JSR PC ,OMRW 





IF MEM MGT IS PRESENT THE SUBROUTINE USES (DMTSTA) 

AS THE PAGE ADDRESS , PLACING IT IN PAR #6, AND CREATES 
A VIRTUAL ADOR IN THE RANGE OF PAR #6 WHICH CONTAINS 
THE SIX LSB’'S. 

IF IT IS NOT PRESENT THE COMTSTA) IS CONVERTED INTO 
THE EQUIVALENT 16 BIT PHYSICAL ADDRESS. 


s* SUBORDINATE ROUTINES CALLED: CKTRAP,OM168. 
b-- $660666666460600606 66 66060606 06060600060606060600000000000000000000000000008 


JSR 


103 


OMTSTA, @PAR6A 
#140052, RO 


@1,OMTSTA 
8$ 


#140025, RO 
eae SMMSRO 


RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


sSAVE THE SOURCE ADOR 

sIF MEM MGT IS PRESENT THEN 
sJUMP AND SET UP THE PAR 06 
sOTHERWISE CONVERT OMTSTA INTO A 16-BIT 
sPHYSICAL ADDRESS, IN RO. 

sJUMP TO PERFORM THE MOVE 

sSET PAR 06 

sSET THE SIX LSB’S AND CONVERT TO 

sA VIRTUAL ADDRESS WITHIN THE INFLUENCE 
sOF PAR 06. 

sIF BIT @0 OF DMTSTA IS CLEAR THEN 
sAVOID CHANGING THE LSB‘S 

sCHANGE THE LSB’‘S 

sENABLE MEM MGT. 

sIF A READ IS SPECIFIED THEN 








3917 030562 
3918 030564 
3919 030566 
3920 030570 
3921 030574 
3922 030576 
3923 030600 
3924 030602 
3925 030604 
3926 030606 
3927 030612 
3928 030614 
3929 030620 

030620 
3930 030622 
3931 


12$: 
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JSR 






— SWAPING THE SOURCE AND DESTINATION. 


sRESTORE THE ORIGINAL SOURCE FOR THE MOVE. 
sPERFORM THE BYTE MOVE. 


sEXIT IF A TRAP 


OCCURED. 


sINCREMENT THE DESTINATION ADDRESS 
sINCREMENT THE SOURCE ADOR. 
sDECREMENT THE DATA 
sREPEAT UNTIL ALL DATA REAC/WRITTEN 
- MEM MGT IS PRESENT THEN 


;DISABLE IT. 


PC ,@CSP)-+ 


sRETURN TO PREGOS SUBRT. 












rr  — 


CVOHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 77 
GLOBAL SUBROUTINE 


3933 
3934 
3935 
3936 


030624 
030624 
030630 
030634 
030640 


030642 
030644 
030650 
030652 
030654 
030656 
030662 
030666 
030670 
030674 
030676 
039700 
030702 
030704 
030710 
039712 
030714 


005474 
000200 
002472 


000005 


177761 
002474 


000006 


160000 


000200 





- DODMA - 


-SBTTL GLOBAL SUBROUTINE 


yee SOORES SESE SEEEEEEEEEEEEESEEEEEEEEEEEAEEEEESEEEEEEEEEEEEDDEEOEEEEEOEEDEEEES 
- Initiate DMA Transmission Routine - 


- DOOMA - 


re This routine writes the DMA peremeter to the specified device and 
3¢ initiates the DMA transmission. 

3% 

3@ INPUTS: R1 - Line number on which to initiate the DMA. 

34 R2 - Stert eddress of the DMA buffer (16 bit virtual). 

34 R3 - Cheracter count of the DMA buffer. 

3¢ CSRA - Contains address of the DUT CSR. 

34 IESTAT - Storage for states of the interrupt enable bits. 

34 MMENAB - oan Bal man t flag (0 if MEM MGT not enabled). 
1a HOST MEM MGT P REGISTERS - If MEM MGT is in use. 

34 TXADIA - Contains address of OMA TX buffer address reg #1. 
38 TXAD2A - Conteins address of OMA TX buffer address reg ¢2. 
34 TXBFCA - Contains address of DMA character count register. 
34% 

3# OUTPUTS: CARRY - Success gleg (set if DMA_START found clear). 

:4 DUT TBUFFAD1 - LS 16 bits of DMA buffer address (initialized). 
34 DUT TBUFFAD2 - MS 6 bits of DMA buffer address (initialized), 
Le DMA_START bit set. 

34 DUT TBUFFCT - DMA buffer cherecter count (initialized). 

34 

3@ CALLING SEQUENCE: JSR PC ,DODMA 

34 

3 COMMENTS: This routine determines if Memory Management is being used 


DOOMA:: SAVE 


; Memmory management is in use. 


and sets up the full 22 bit physical address if necessary. 
3 SUBORDINATE ROUTINES CALLED: None. 


t-- SOCEORAEEEEEEEEEEEAEEEDEEEEEESEEEEESEEEEEEOEOEEEEEEEEEEEDEEREDEEEEEEEEEREDSE 


JSR 


#200 ,R4 
MMENAB 
6$ 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sPREPARE TO CLEAR UPPER 6 BITS OF DMA BUFF ADR. 
sCHECK FOR MEMORY MANAGEMENT IN USE. 

sGOTO SET UP DEVICE IF MEM MGT NOT IN USE. 


; Construct 22 bit physical address from the 16 bit virtual address. 


2s: ROL 


4$: ASL 


PAROA,RS 


#160000,R2 
RS ,R2 
R4 


#200,R4 


sSTRIP THE MOST SIGNIFICANT 3 BITS OF THE 

; DMA BUFFER VIRTUAL ADDRESS AND MULTIPLY 
; THEIR VALUE BY TWO TO GET AN OFFSET INTO 
; THE TABLE OF MEMMORY MANAGEMENT PAGE 

s ADDRESS REGISTERS (PAR). 

; 


sADD IN THE BASE VALUE OF THE MM PAR REGISTERS. 
sGET THE 16 BIT PHYSICAL ADDRESS BLOCK COUNT. 
sSHIFT UPPER 6 BITS OF THE PHYSICAL ADDRESS 

s BLOCK COUNT (GOTTEN FROM THE PROPER PAR) 

s INTO THE LS 6 BITS OF THE WORD TO WRITE 

s INTO THE DUT TBUFFAD2 REGISTER. 


é 

sADD THE 13 BIT DISPLACEMENT FIELD FROM VIRTUAL 
s ADR TO THE SHIFTED BLOCK NUMBER FROM THE 

; MEMMORY MANAGEMENT PAR. 

sSET THE DMA_START BIT IN WORD FOR TBUFFAD2. 


SEQ 0105 
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SEQ 0106 


3989 i¢ 
3990 s Write the DMA parameters out to the DUT DMA registers. 
3991 3 Disable interrupts. 
3992 ; Set up DUT CSR IND.ADR.REG field. 
3993 ; Write the DMA transmit cheracter count. 
3994 : Write the least significant 16 bits of the DMA buffer stert address. 
3995 3 Write the most significant 6 bits of the address, 
3997 ; setting the DMA_START bit, and initiating the DMA transmission. 
a0 

3998 030720 106705 6$: MFPS RS sGET THE PRESENT PROCESSOR PRIORITY. 
3999 030722 106427 000340 MTPS @PRIO7 sOISABLE ALL HARDWARE INTERRUPTS. 
4000 030726 053701 002374 BIS IESTAT,R1 sPREPARE FOR SETUP OF LINE NUMBER IN DUT CSR. 
4001 030732 010177 151342 MOV R1,8CSRA sSET UP THE DUT CSR IND.ADR.REG FIELD. 
4002 030736 105777 151352 TSTB @TXAD2A sTEST THE DUT DMA_START BIT. 
4003 030742 000241 CLC sINDICATE FAILURE IN CASE OMA.HO BIT IS SET. 
4004 030744 100410 BMI 60$ sEXIT WITH FAILURE IF OMA.HO BIT IS SET. 
4005 030746 019377 151344 MOV R3,8TXBFCA sWRITE THE DMA CHARACTER COUNT. 
4006 030752 010277 151334 MOV R2,@TXADLA sWRITE THE LS 16 BITS OF BUFFER ADDRESS. 
4007 030756 110477 151332 MOVB R4,8TXAD2A sWRITE MS 6 BITS OF ADR AND START DMA Tx. 
4008 030762 106405 MTPS RS sRESTORE THE PROCESSOR PRIORITY. 
oe 030764 000261 SEC sINDICATE SUCCESS. 
401 
4011 020766 60$: PASS ;RESTORE GPRS, 

030766 004736 JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
4012 030770 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF SUCCESS). 





CVDMEBO DHV11-M TEST, ORION UFD MACRO Y05.02 Wednesday 08-May-85 10:16 Page 78 





GLOBAL SUBROUTINE 


4033 030772 
030772 


4037 030776 
4038 031000 
4039 031004 
4040 031010 
4041 031014 
4042 031016 
4043 031020 
4044 031022 
4045 031024 
4046 031026 
4047 031030 
4048 031032 
4049 031034 


4051 031036 
031036 
031042 
031046 


4055 031050 


004537 


005001 
012703 
013700 
012705 
030500 
001006 
006305 
005201 
020103 
002772 
000241 
000401 
000261 


010166 
010566 
004736 


000207 


005474 


000010 
002272 
000001 


000004 
000014 





- FINACT - 


-SBTTL GLOBAL SUBROUTINE 


iee SOCEEEOEAESESEEEEASEEEAEESESEEESSEEAEEEEAEEHEEEEEEEEEREREEEEEEEEEEREEEEE EES 
- FIND FIRST ACTIVE LINE - 

This subroutine calculates the number of the first active line that 

is found in the active line bit map ACTLNS. 


3* INPUTS: 
34 
3@ OUTPUTS: 


3% 
3 CALLING SEQUENCE: 


3% 

3 COMMENTS: 
34 

3* SUBORDINATE ROUTINES CALLED: NONE. 


t-- SOCEEEEESEEASEEEEEDEEAEEEEEAEAEEEEEAEERAERAEEEEEEAEEEREEAEEA ERASE EEREEEEES 


FINACT:: 


2s: 


4$: 


3? 


SAVE 


- FINACT - 


ACTLNS - Contains the active line bit map. 


R1 - Contains the number of the first active line. 
RS - Contains the bit map representation of the active line. 
Carry set indicates success. 


JSR 


JSR 


PC ,.FINACT 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


; Find an active line on which to perform the test. 


RTS 


R1 
@NUMLNS , R3 
ACTLNS ,RO 


PC 


sCLEAR THE LINE NUMBER COUNTER. 

sGET MAX LINE NUMBER. 

sGET THE ACTIVE LINE BIT MAP. 

sSET UP A LINE BIT MASK. 

sLOOK FOR AN ACTIVE LINE. 

sBRANCH TO BEGIN TEST IF A LINE HAS BEEN FOUND. 
sSHIFT THE BIT MASK FOR THE NEXT LINE. 
sINCREMENT THE LINE NUMBER COUNTER. 
sCHECK IF ALL LINES HAVE BEEN TRIED. 
sLOOP TO TRY THE NEXT LINE. 

sCLEAR CARRY BIT, NO ACTIVE LINE FOUND. 
sEXIT WITH FAILURE. 

sSET CARRY, SUCCESS. 


sRESTORE GPRS, EXCEPT 


R1,R1SLOT( SP) sPUT R1 IN STACK SLOT. 
RS ,RSSLOT( SP) sPUT RS IN STACK SLOT. 
PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 


sR1 - CONTAINS THE NUMBER OF FIRST ACTIVE LINE. 
3RS_- CONTAINS THE BIT MAP OF THE ACTIVE LINE. 
sCARRY - SET INDICATES SUCCESS. 

















SEQ 0107 
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4083 031052 
031052 
4084 031056 
4085 031060 
4086 031062 
4087 031066 
4088 031070 
4089 031074 
4090 031076 
4091 031100 
4092 031104 
4093 031106 
4094 031112 


4096 031116 
4097 031122 


4099 031124 


031124 
031130 


4102 031132 


005474 


003066 
003062 


003270 


003070 
003062 


003066 


000006 





- GETCHR - 


-SBTTL GLOBAL SUBROUTINE 


zee SERRE SESEEEEESEEEEREEESEEESERESEEAEEEEEEE ERED ERED EEEDEEEEODEEDSOEEEEREEEDE 


- GETCHR - 


34 - Get a Character From the RX Buffer Routine - 

34 This subroutine gets a character from the RX buffer which is in the 
;* host system memory. If the buffer is empty entry of this routine 
;* this routine returns a null cheracter with DATA.VALID clear end @ 

pe buffer empty indication. 

fe 

;# INPUTS: RXBCNT - RX buffer character count. 

;@ RXBEND - Label after end of the RX buffer erea in a 

34 RXBETX - Equated to RX buffer level at which to enable TX. 

34 RXBOPT - Pointer to next available input slot of RX buffer. 
34 RXBSTA - Label at start of RX buffer area in memory. 

34 

3# OUTPUTS: R2 - Character which is read from the buffer. 

34 RXBOPT - Updated to point to next input slot of RX buffer. 

34 RXBCNT - RX buffer character count (Updated). 

’ CARRY - “Success” flag (Set if buffer is not empty on entry). 
7* 

3* CALLING SEQUENCE: JSR PC ,GETCHR 

3% 

3# COMMENTS: 


3* 
3# SUBORDINATE ROUTINES CALLED: None. 
i-- SESREEEEEEEEEERESEESEEAEEEAAESEAEAEAREEEEAASEAAEARAREAREEEEREDEARREREL EELS 


GETCHR:: SAVE 


2s: MOV 


60$: PASS 


RTS 


JSR 


RXBOPT ,R4 
(R4),R2 
C(R4)+ 

R4, @RXBEND 
2s 


ORXBSTA,R4 
R4 ,RXBOPT 


RXBCNT 


R2 
MOV 
JSR 


PC 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
;CLEAR THE “RE-ENABLE” TX FLAG (SUBRTN OUTPUT). 
sGET NULL CHAR IN CASE BUFFER IS EMPTY. 
sCHECK FOR RX BUFFER EMPTY, CLEAR CARRY. 
sEXIT THE ROUTINE IF BUFFER IS EMPTY. 

sGET THE BUFFER OUTPUT POINTER. 

sGET A CHARACTER FROM THE BUFFER. 

sDELETE THE READ CHARACTER FROM THE BUFFER. 
sCHECK IF POINTER SHOULD WRAP AROUND. 

sSKIP WRAPAROUND IF POINTER IS NOT AT END. 
sWRAP INPUT POINTER AROUND. 

sUPDATE THE OUTPUT POINTER STORAGE. 


sREMOVE THIS CHAR FROM THE BUFFER COUNT. 
sSET SUCCESS FLAG, BUFFER WAS NOT EMPTY. 


sRESTORE GPRS, EXCEPT 
R2,R2SLOTC( SP) sPUT R2 IN STACK SLOT. 


PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 


sR2_ - CONTAINS THE CHARACTER READ FROM BUFFER. 
sCARRY-"SUCCESS” FLAG, SET IF BUFFER NOT EMPTY. 




























SEQ 0108 
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4104 
4105 
4106 
4107 
4108 
4109 
4110 
4111 
4112 
4113 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
4126 
4127 
4128 
4129 
4130 
4131 
4132 
4133 
4134 


4135 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4158 
4159 


r-— 


031134 
031134 
031140 
031142 
031144 
031150 
031154 


031160 
031164 
031166 
031172 
031174 
031200 
031202 
031206 
031210 
031214 
031216 
031220 
031222 


031224 
031230 
031232 
031234 


004537 
005701 
001006 
012701 
012702 
012703 


020327 
103417 
012703 
005722 
020227 


005474 


005252 
005254 
005256 
005260 
005256 
005256 
005254 


005254 


177400 





-SBTTL GLOBAL SUBROUTINE 
FO + SPARSE EEESEEEREEEEEEEE SEES EEDEEEODES 146406 O000000006000000000006000000008 


- GETLP2 - 


34 - Get Line Parameters Routine Number Two - 

34 This routine is used to repeatedly get combinations of line parameter 
iA contents for the Single Character Mode TX/RX Test (long data pattern). 
;* Each time this routine is called it gets another combination of the 
34 peremters in the paremter tables until all combinations have been 

34 returned at which point it returns a “failure” indication. 

3* 

3* INPUTS Single cheracter mode, short data pattern TX/RX tables: 

38 SCBCT - Number of bits per char table (4 entries). 

34 SCNST - Number of stop bits bits table (2 entries). 
34 SCTPT - Type of parity table (3 entries). 

;* Each table has a base and end label consisting of the name of 
3* the table with a "B” and “E” appended respectively. 

;* Ri thru R3 - Pointers into SCBCT, SCNST, SCTPT tables 

34 Rl is clear if this is the first call of GETLP2. 

34 

3# OUTPUTS: RO - Composed LPR contents, clear if failure (Done), 

34 38.4K baudrate is selected. 

34 Rl thru R3 - Table pointers (Updated). 


3% 
3# CALLING SEQUENCE: JSR 


3* 
3* COMMENTS: 
;* 


This routine should be used in con 
routine to avoid destroying the GP 


PC ,GETLP2 


nction with a SWAPx 
contents. 


3* 
s* SUBORDINATE ROUTINES CALLED: None. 
F-~ SRREREEREAEEEREEEEEEEEEEEEEESAAASEEEEEEEEEEEESEEEEEEEEEDEEEREEREEEEEEEEERELS 


GETLP2:: SAVE 


2s: CMP 


4$: MOV 


JSR 
R1 
2$ 
#SCBCTB,R1 
#SCNSTB,R2 
@SCTPTB,R3 
R3,@SCTPTE 
4$ 
#SCTPTB,R3 
(R2)+ 
R2,@SCNSTE 
4s 
@SCNSTB,R2 
(R1)+ 
R1,#SCBCTE 
4$ 
RO 
60$ 
#177400,RO 
(R1),RO 


(R2),RO 
(R3)+,RO 


sSAVE CONTENTS OF GPRS RO THRU R5. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sTEST FOR THIS BEING FIRST CALL OF GETLP2. 
sSKIP ORIGINAL SET UP IF NOT FIRST CALL. 
sINITIALIZE BITS PER CHAR TABLE POINTER. 
sINITIALIZE @ OF STOP BITS TABLE POINTER. 
sINITIALIZE TYPE OF PARITY TABLE POINTER. 


sCHECK FOR POINTER AT END OF TABLE. 

sGO GET LPR CONTENTS IF NOT AT END OF TABLE. 
sRESET POINTER TO BEGINNING OF TABLE. 

sINC THE # OF STOP BITS TABLE POINTER BY 2. 
sCHECK FOR POINTER AT END OF TABLE. 

sGO GET LPR CONTENTS IF NOT AT END OF TABLE. 
sRESET POINTER TO BEGINNING OF TABLE. 

sINC BAUD RATES TABLE POINTER BY 2. 

sCHECK FOR POINTER AT END OF TABLE. 

sGO GET LPR CONTENTS IF NOT AT END OF TABLE. 
sPREPARE TO PASS OUT CLEAR LPR FIELDS. 
sINDICATE “FAILURE” FOR EXIT. 

sEXIT WITH “FAILURE”, WE'RE DONE. 


sSET BAUD RATE FIELDS FOR 38.4 K BAUD. 

sGET THE BITS/CHAR FIELD OF NEW LPR CONTENTS. 
sINCLUDE THE NUMBER OF STOP BITS FIELD. 
sINCLUDE THE TYPE OF PARITY FIELD. 


































SEQ 0109 
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4160 031236 000261 
4161 
4162 031240 
031240 010066 
031244 010166 
031250 010266 
031254 010366 
031260 004736 
4163 031262 000207 


-— 


















SEQ 0110 
- GETLP2 - 
SEC sINDICATE “SUCCESS” FOR EXIT. 
60$: PASS RO,R1,R2,R3 sRESTORE GPRS R4 E— RS, LEAVE FOLLOWING INTACT: 
MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 


MOV R1,R1ISLOTC(SP) sPUT R1 IN STACK SLOT. 
MOV R2,R2SLOT( SP) sPUT R2 IN STACK SLOT. 
MOV R3,R3SLOT( SP) sPUT R3_ IN STACK SLOT. 
JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC + Ri THRU R3 - POINTERS, RO - NEW LPR FIELDS. 
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4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
4182 
4183 
4184 


4185 
4186 
4187 
4188 
4189 
4190 
4191 
4192 
4193 
4194 
4195 
4196 
4197 
4198 
4199 
4200 


4201 


—— 


031264 
031264 
031270 
031272 
031276 
031300 
031304 
031306 
031310 
031312 
031314 
031316 
031320 
031322 
031326 
031332 


031336 
031336 
031340 


010237 


004736 
000207 


005474 
177400 
000360 


005344 
177400 
002402 


- GETTIN - 


-SBTTL GLOBAL SUBROUTINE 
see SECEEESEEEESEEEREEEDEEEEED DEES REEEEDED ODED HEEEOE DEED ODO O044404840404RRE EEE 
- Get Time-out Value Based on Minimum Baudrate Routine - 

This subroutine gets the necessary time-out value to verify that all 


;* 

3* pattern. 
;* 

3* 

;# INPUTS: 


chars have been received at the 


;* 
s# OUTPUTS: 


3* 
3# CALLING SEQUENCE: 


;* 
3* COMMENTS: 


- GETTIM - 


completion of the TX/RX of a data 


This uses the slowest baudrate which is specified in the 
passed in DUT LPR contents to calculate this time-out value. 


Ri - DUT LPR contents. 


RXTOUT - Time-out value for waiting for last RX cher. 


JSR 


PC ,GETTIM 


s* SUBORDINATE ROUTINES CALLED: None. 
b-- SRRERREREEEEEEEE EE EAEEEEEEEEEDEEEEEEEEODEE EEE DS O04 000000 00060004000008008 


GETTIM:: 


2s: 


SAVE 


JSR 
R1 
+ ot aes 


R2,R1 
PROTBL(R1),R2 
#177400,R2 
R2,RXTOUT 


JSR 
PC 





sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sPUT THE BAUD RATE FIELDS IN THE LOW BYTE. 
sCLEAR STOP,PARITY,AND CHAR FIELDS. 

sCOPY BAUD RATE FIELDS. 

sSELECT RX BAUD RATE FIELD ONLY. 

sSHIFT TX BAUD RATE FIELD 

; TO OCCUPY THE LOW FOUR BYTES. 

; 


‘ 

sCHECK IF SAME BAUD RATE IN EACH FIELD. 
sBRANCH IF RX BAUD RATE IS LOWER OR SAME. 
sTX BAUD RATE IS THE SLOWER OF THE TWO. 

sGET PROPORTIONAL DELAY FROM TABLE. 

;sCLEAR UPPER BYTE BECAUSE OF SIGN EXTENSION. 
sLOAD THE RX TIME-OUT VARIABLE. 


sRESTORE GPRS. 
PC,@(SP)-+ 


sRETURN TO PREGOS SUBRT. 





SEQ 0111 
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4203 -SBTTL GLOBAL SUBROUTINE - INDATP - 
4204 b¢¢ SRRRROSEEEEEEEEE EE EEEE ES EEEEODEEOD EERE ODES EOE OE OOOO OE OE OOOO OE OE ODER EERE EES 
4205 3* - INITIALISE DATA PATTERN - 
4206 3% This subroutine is used to initialise an incremental byte data pattern 
4207 3* in the general buffer area. 
sues i The date pattern will be sequential from 0 to 255 (decimal). 
3* 
4210 3* INPUTS: BUFBAS - Address of the start of the general buffer area. 
reap ;* BUFMID - Address of the 255 th location. 
;* 
re 3# OUTPUTS: The first 255 locations of the general buffer area contain data 
3* 
4215 3* CALLING SEQUENCE: JSR PC, INIDATP 
4216 3* 
4217 ;* COMMENTS: 
4218  e 
4219 ;* SUBORDINATE ROUTINES CALLED: NONE. 
4220 b-- SERRE EEEEEREEEEEAEESEEEEEEEADEAEE ORDERS EE EE EE OE EEE EOE EEOE EE EE EER ER EEE 
4221 
4222 031342 INDATP:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
neon 031342 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
4224 021346 012702 004012 MOV #BUFBAS,R2 sINITIALIZE THE DATA PATTERN IN THE GENERAL 
4225 031352 005003 CLR R3 ; DATA BUFFER TO A 256 BYTE PATTERN. 
4226 031354 110322 2s: MOVB R3,(R2)+ H 
4227 031356 005203 INC R3 sSELECT THE NEXT CHARACTER. 
4228 031360 020227 004412 CMP R2,#BUFMID sCHECK IF WE HAVE 256 DATA PATTERNS. 
ro 031364 103773 BLO 2s : 
42 
4231 031366 60$: PASS sRESTORE GPRS. 
031366 004736 JSR PC,ACSP)+ sRETURN TO PREGOS SUBRT. 
4232 031370 000207 RTS PC 


-— 
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SEQ 0113 


4234 -SBTTL GLOBAL SUBROUTINE - INDTPX - 
4235 b+ RERREEEEEEEEEE SEES OE EE EEE EOE OS OOO OS OO OE OOO OOOO OO OOOOH OE OEE EEE EES 
4236 ;* - INITIALISE DATA PATTERN WITHOUT XON OR XOFF - 
4237 ;* This subroutine is used to initialise an incremental byte date pattern 
4238 3% in the general buffer area. 
4239 3* The data pattern will be from 0 to 255, but wll exclude the following 
4240 3% two characters; (ASCII 0Ci, OC3) XON AND XOFF. This will cause the 
anak 3* last two date characters to be the same as the first two. 
GF 
4243 ;* INPUTS: BUFBAS - Address of the start of the general buffer area. 
a 3* BUFMID - Address of the 255 th location. 
3* 
cant ;* OUTPUTS: The first 255 locations of the general buffer area contain data 
;* 
4248 3* CALLING SEQUENCE: JSR PC, INDTPX 
4249 3* 
4250 3* COMMENTS: 
4251 :* 
4252 ;*# SUBORDINATE ROUTINES CALLED: NONE. 
4253 Salata cachaceehte eta be htt LL LLL LLL LLL LiL tei TTT TT TTT TTT TT TTT TTT tt 
4254 
4255 031372 INDTPX:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
nn 021372 004537 005474 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
3¢ 
4257 > Initialize the 256 byte data pattern. 
4258 +; Ensure the data pattern is free from XON’s or XOFF’s to prevent errors. 
— i Note: the first two characters and the last two characters will be the same. 
2 ‘* 
4261 031376 012702 004012 MOV #BUF BAS ,R2 sINITIALIZE THE DATA PATTERN IN THE GENERAL 
4262 031402 005003 CLR R3 ; DATA BUFFER TO A 256 BYTE PATTERN. 
4263 031404 110322 2$: MOVB R3,(R2)+ 3 
4264 031406 105203 ‘ INCB R3 sSELECT THE NEXT CHARACTER. 
4265 031410 122703 000021 CMPB = #21, R3 ;CHECK FOR AN XON CHARACTER. 
4266 031414 001001 BNE 4$ sBRANCH IF CHAR NOT AN XON. 
4267 031416 105203 INCB R3 sFORCE THE NEXT CHARACTER. 
4268 031420 122703 000023 4$: CMPB = #23,R3 sCHECK FOR AN XOFF CHARACTER. 
4269 031424 001001 BNE 6$ sBRANCH IF NOT AN XOFF CHARACTER. 
4270 031426 105203 INCB R3 sFORCE THE NEXT CHARACTER. 
4271 031430 020227 004412 6$: CMP R2,#BUFMID sCHECK IF WE HAVE 256 DATA PATTERNS. 
ark 031434 103763 BLO 2s 3 
2 
4274 031436 60$: PASS ;RESTORE GPRS. 
031436 004736 JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
4275 031440 000207 RTS PC 





-— 
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SEQ 0114 


4277 -SBTTL GLOBAL SUBROUTINE - INICHR - 

4278 BB Macaca ndee thie ttt T Li TTT TTT TTT TTT TTT TTT ttt 
4279 3* - Send Initial Characters Routine - 

4280 3% This routine is used to initiate single character transmission. 
4281 ;* This routine sends the initial characters to each active lines to 
4282 34 cause future TX interrupts which will continue the transmission if 
re 3* more than one character is to be sent to each active line. 

2 4 7* 
4285 3* INPUTS: ACTLNS - Bit map of active DUT lines. 
4286 34 BITTBL - Label of table of words each with a bit set. 
4287 3* CSRA - Contains the address of the DUT CSR. 
4288 7% DPENDB - Base of the data pattern end table (entry per line). 
4289 34 DPLENB - Base of the date pattern length table. 
4290 3* IBM - Bit mask of inactive TX/RX bits. 
4291 3% IESTAT - States of DUT int enable bits (Other bits clear). 
4292 3% NUMLNS - Equated to the number of lines on the DUT. 
4293 3% TXCHRA - Contains the address of the DUT TXCHAR register. 
4294 34 TXCNTB - Lable at base of the TX character counter table. 
4295 3% TXPTRB - Label at base of the [X data pattern pointers table. 
4296 3* 
4297 3* OUTPUTS: CSR - DUT CSR IND.ADR.REG field is destroyed. 
4298 34 TXCHAR - DUT TXCHAR has word written to it. 
4299 ;* TXCNTx - Counters incremented for lines on which chars sent. 
4300 3* TXPTRB - Each pointer in table points to next TX char for line. 
4301 3* 
tos | 3* CALLING SEQUENCE: JSR PC, INICHR 
430 3* 
4304 3* COMMENTS: This routine assumes that at least one character should be 
4305 ;* Be transmitted on each active line. 
tees 74 Interrupts must be disabled when calling this routine. 
4 i* 
4308 ;+* SUBORDINATE ROUTINES CALLED: None. 
4309 b~- SEREEEERER EEE EE OE EGGS ODES EE EE EE ESOS OOOO OE OEE OO OOOO EOE ERED REED EERE EEE 
4310 031442 INICHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

031442 004537 005474 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 

4311 031446 013701 002374 MOV IESTAT,R1 sGET STATE OF TX.IE, RX.IE FOR USE IN SETTING 
4312 ; UP THE IND.ADR.REG FIELD OF THE DUT CSR. 
4313 031452 005002 CLR R2 ;SET LINE NUMBER OFFSET TO LINE 0. 
4314 031454 036237 002534 002272 23: BIT BITTBL(R2),ACTLNS ;TEST THE ACTIVE LINES BIT FOR THIS LINE. 
4315 031462 001424 BEQ 6$ sD0N‘'T TX ON THIS LINE IF IT IS NOT ACTIVE. 
4316 031464 010177 150610 MOV R1,8CSRA sSET UP THE IND.ADR.REG FIELD OF THE CSR. 
4317 031470 016205 003512 MOV TXPTRBC(R2),R5 sGET THE TX DATA PATTERN POINTER FOR THIS LINE. 
4318 031474 112504 MOVB (R5)+,R4 sGET THE CHAR TO TX ON THIS LINE, INC POINTER. 
4319 031476 020562 003312 CMP RS ,DPENDB(R2) sCOMPARE POINTER WITH DATA PATTERN END ADR. 
4320 021502 103402 BLO 4$ sSKIP POINTER WRAPAROUND IF NOT AT PATTERN END. 


4321 031504 166205 003352 SUB DPLENB(R2),RS  ;WRAP TX POINTER AROUND TO BEGINNING OF PAT‘N. 

4322 031510 010562 003512 4$: MOV RS,TXPTRBCR2) ;UPDATE THE TX POINTER STORAGE TABLE FOR LINE. 

4323 031514 043704 002366 BIC IBM,R4 sCLEAR INACTIVE BITS OF TX CHARACTER WORD. 

4324 031520 052704 100000 BIS @BIT15,R4 sSET THE TX.DATA.VALID BIT IN THE WORD. 

4325 031524 010477 150552 MOV R4,8TXCHA ;TX THE FIRST CHARACTER FOR THIS LINE. 

4326 031530 005262 003652 INC TXCNTB(R2) sINCREMENT TX CHARACTER COUNTER FOR THIS LINE. 

4327 031534 005201 6%: INC Ri sINCREMENT WORD FOR IND.ADR.REG FIELD SET UP. 

4328 031536 062702 000002 AOD #2 ,R2 sSET LINE NUMBER OFFSET TO NEXT LINE. 

4329 031542 020227 000020 CMP R2, @NUMLNS #2 sCOMPARE LINE “FSET WITH TWICE THE @ OF LINES. 

oe 031546 002742 BLT 2s sLOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 
1 

4332 031550 60$: PASS sRESTORE GPRS. 


—— 
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031550 004736 JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
4333 031552 000207 RTS PC 





















031554 
031554 
031560 


031564 


031566 
031570 
031572 
031576 
031600 


031602 
031606 


004537 
013705 


005001 


016403 
016402 


005474 
002272 


002534 


003352 
003512 
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-SBTTL GLOBAL SUBROUTINE 
bO¢ SESEEEEE SESE EE 44 660000060060 000600000000060000000000000000000000000000008 


34 - Initiate DMA Transmissions Routine - 

34 This routine is used to initiate DMA mode transmission. It sends 

34 the initial DMA buffer on each active line to cause future TX 

34 interrupts which will continue the transmission if more then one 

pa buffer is to be sent. 

3* 

3@ INPUTS: ACTLNS - Active lines bit map. 

3% BITTBL - Label of table of words each with a bit set. 

;* CSRA - Contains the address of the DUT CSR. 

34 DPENOB - Base of the dete pattern end table (entry per line). 
34 DPLENS - Bese of the dete pattern length teble. 

34 IESTAT - Preserved states of the DUT interrupt enable bits. 
3% NUMLNS - Equated to number of lines on ea DUT. 

34 TXCNTB - Leable at base of the TX character counter teble. 

3% TXPTRB - Lebel eat base of the TX date pattern pointers table. 
3% 

3# OUTPUTS: CSR - DUT CSR IND.ADR.REG field is destroyed. 

3% €6€0€€€06¢0¢¢¢¢¢¢¢ ADD COMMENTS PSS SSE SESS EC eee eee eee eee ee 
34 TXCNTx - Counters incremented for lines on which chars sent. 
34 TXINTF - TX int flegs (bit set if DMA.HO found set on line). 
3* 

3* CALLING SEQUENCE: JSR PC ,INIOMA 

3% 

:* COMMENTS: This routine assumes thet et least one date pettern should be 
3* transmitted on each active line. 

34 Interrupts must be disabled when calling this routine. 

3 


3¢ 
s Set up loop which handles one line per iteration. 
CLR 


3¢ 
; Get a bit map of the selected line. 
s If the line is inactive skip to select the next line. 


2s: MOV 


; Line is active. 
+ Initiate DMA on this line. 
3 Get the date pattern length for this line. 


3 - 
MOV 
MOV 


3¢ 
; Write OMA paremeters to the DUT. 


* 
s# SUBORDINATE ROUTINES CALLED: DODMA. 

b-- S8686866 66066666 604006666666000600600000000060000000000000000000000600000006 
INIOMA:: SAVE 


MOV 





SEQ 0116 








- INIDMA - 






















sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sGET THE ACTIVE LINES BIT MAP. 









JSR 
ACTLNS ,RS 









R1 sCLEAR THE LINE NUMBER COUNTER. 






R1,R4 sCALCULATE AN OFFSET TO THE PROPER LINE 

R4 s_ ENTRY IN A WORD TABLE (LINE @ TIMES 2). 
BITTBLC(R4),R2 ;GET A BIT MAP FOR THIS LINE. 

R2,R5 sTEST THE ACTIVE LINES BIT FOR THIS LINE. 
10% sD0N‘T TX ON THIS LINE IF IT IS NOT ACTIVE. 








DPLENB(R4) ,R3 
TXPTRBCR4) ,R2 


sGET DATA PATTERN LENGTH FOR THIS LINE. 
sPREPARE TO PASS DATA PATTERN ADR TO DOOMA RTN. 

















4391 031612 
seek 031616 


4405 031632 
4406 031634 
4407 031640 
4408 

4409 031642 


031642 
4410 031644 





004737 
103403 


050537 
000402 


060364 


005201 
020127 
002752 


004736 
000207 
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030624 


002420 


003652 


000010 


- INIOMA - 






JSR PC ,DOOMA 


BcsS 63 sSKIP ERROR IF DOOMA WAS SUCCESSFUL. 
3¢ 
s Set the proper bit of the TX interrupt flegs to indicete the line error. 
g° 
BIS RS, TXINTF sINDICATE THE ERROR. 
BR 10$ sSKIP UPDATING POINTERS AND COUNTERS. 
3¢ 
: Update the TX character count for this line. 
ge 
6%: ADD R3,TXCNTBCR4) ;ADD THE DATA PATTERN LENGTH TO TX CHAR COUNT. 
3¢ 
s Increment line counter,goto next line if not done. 
g= 
10$: INC Ri sINCREMENT THE LINE COUNTER. 
CMP R1, @NUMLNS sCOMPARE THE LINE COUNTER WITH NUMBER OF LINES. 
BLT 2s sLOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 
603: PASS sRESTORE GPRS. 
we - JSR PC ,@CSP)+ sRETURN TO PREGOS SUBRT. 









GLOBAL SUBROUTINE 


4412 
4413 


4436 


4437 
4438 
4439 
4440 


4441 


Exe 


031646 
031646 
031652 
031656 
031660 
031664 
031664 
031670 
031672 


004537 
042701 
006301 
016100 


010066 
004736 
000207 


005474 
177760 


002534 
000002 





——_———— rr 
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- LINBIT - 
-SBTTL GLOBAL SUBROUTINE - LINBIT - 
gee SOOO OEOEEEESEEOEEEEEEEEEEEEDEEEEOEEEOEOEOEOEEOOEOEEEEEOEOOOO4O00006006006686 
36 - Line Number to Bit Map conversion subroutine - 
;@ This subroutine is used to generate a bit map (one bit of 16 set) 
:* based on a line number (range: 1 to 16). Only the LS 4 bits of the 
:* line number word ere used, the others ere masked out (so unmasked 
3¢ MSBytes of DUT CSRs can be passed to this routine without error). 
34 
3@ INPUTS: Ri - Line number (only LS 4 bits used, others disregarded). 
;¢ BITTBL - Base label of a 16 word bit table. 
3% 
3@ OUTPUTS: RO - Bit map, bit corresponding to line number is set: 
;a _ If Line number is 3, then bit3 is set, etc. 
34 
3* CALLING SEQUENCE: JSR PC,LINBIT 
at 
3 COMMENTS: No checking is performed to verify that the line number is 
34 @ iegel line number for the DUT (ie - less than NUMLNS). 
34 NOTE: The line number is not destroyed of altered, so this 
34 routine can be used easily in loops. 
3* 


s* SUBORDINATE ROUTINES CALLED: None. 
F-- SOORERESEAAEEEEEER SEES SEEEEDEDEEEEEEES EOE EEEEDKEEEEEEEEODDEEEDEEEEEEEEEEES 


LINBIT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
BIC #177760,R1 sMASK OUT ALL BUT 4 LSBITS OF THE LINE @. 
ASL R1 sMULTIPLY LINE @ BY 2 TO GET WORD TABLE OFFSET. 
MOV BITTBL(R1),RO ;GET THE SINGLE BIT BIT MAP. 
60$ PASS RO sRESTORE GPRS, EXCEPT THE FOLLOWING, 
MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC sRO - BIT MAP WITH LINE @ BIT SET. 





SEQ 0118 








GLOBAL SUBROUTINE 


4443 
2aad 
4445 
4446 


031674 
031674 
031700 
031702 


031704 
021706 


031710 
031712 
031714 


031716 
031716 
031722 
031724 


004537 005474 


010201 
001405 


005002 
000261 


005502 
006301 
001375 


010266 
004736 
000207 


000006 





Sc 
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- MAPCNT - 


-SBTTL GLOBAL SUBROUTINE - MAPCNT - 


yee SPOREREREE EEE EEEEAEAEEEEEEAEADESEEEEEEEEEEDEEEEEEEEEEDEEEEEEEDEDEEEOEEEEDS 
34 - Count Bits in Bit Map Routine - 
ae This subroutine counts the number of bits which ere set in a bit map. 


; INPUTS: R2 - The bit map for which to count the bits. 
° OUTPUTS: R2 - Count of the number of bits that were set. 
- CALLING SEQUENCE: JSR PC ,MAPCNT 

‘s COMMENTS: 

: 


s* SUBORDINATE ROUTINES CALLED: None. 


t-- SORSOSEEERESESEEESEEEAEEESEEEESEEESEEEEAEEEREEREEDEEEEREEEEEEEEEEEDEEEEED EES 


MAPCNT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV R2,R1 
BEQ 60$ sEXIT WITH ZERO IF NO BITS ARE SET IN MAP. 
CLR R2 sCLEAR THE BIT COUNT. 
SEC sCOUNT THE LAST BIT TO BE SHIFTED OUT. 
2s: AOC R2 sCOUNT THE BIT IF IT WAS SET. 
ASL R1 sSHIFT ANOTHER BIT OUT OF THE MAP. 
BNE 2s sLOOP IF ALL BITS NOT SHIFTED OUT OF MAP. 
60$:; PASS R2 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV R2 ,R2SLOT( SP ) sPUT R2 IN STACK SLOT. 
JSR PC .a(SP)-+ ;RETURN TO PREGOS SUBRT. 
RTS PC s 2 - COUNT OF BITS SET IN BIT MAP. 





SEQ 0119 








SS 
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SEQ 0120 

GLOBAL SUBROUTINE - MSLGET - 
4473 -SBTTL GLOBAL SUBROUTINE - MSLGET - 
4474 FORSAEAEAEEAEEOEEREREASEEEEEEEEESSEEEEEEEEAREEEEEEEEEEEEEEEEEEEEEEEE ERED EE EEEDE 
4475 34 - Milli Seconds Loop which returns read word and remaining time - 
4476 3* This subroutine is @ general purpose test loop subroutine. It is used 
4477 i* to verify that a certain action occurs before a time-out period. The 
4478 34 calling routine passes in which bits should be set and cleared for the 
4479 3¢ desired condition and the time-out value in milli-seconds. 
4480 34 This routine checks for the desired condition upon entrance into the 
4481 34 routine and then once each milli-second there after. 
4482 i* Upon return, the last word which was read to check for the condition 
4483 16 is returned by this subroutine. 
4484 34% 
4485 3;# INPUTS: Ril - Time-out value in milli-seconds (up to 64K ms). 
4486 34 R2 - Bit map of bits to test (1 indicates to test the bit). 
4487 34 R3 - Desired states of the indicated fields in R2. 
4488 34 R4 - Address of the word to test. 
4489 34 MSLCNT - Milli second software loop count. 
4490 i* 
4491 3# OUTPUTS: RO - The last word which was read to check for the condition. 
4492 i* Ri - Remaining number of ms in time-out time. 
4493 74 CARRY - Success flag (set if condition is met before time-out). 
4494 i* 
4495 3* CALLING SEQUENCE: JSR PC ,MSLGET 
4496 i* 
4497 3# COMMENTS: This routine works with or without a hardware clock, but the 
4498 74 calibration is only guarenteed when a line clock is available 
4499 ;4 on the system. 
4500 34 This routine can be used as a delay routine, by specifying the 
4501 34 desired delay as the time-out and specifying a condition to 
4502 34 look for which will not be met during the delay. 
4503 34 If a time-out value of 0 is specified, this routine checks for 
4504 34 the desired condition before returning. It indicates success 
4505 34 if the condition is met, failure otherwise. 
4506 ;* 
4507 3* 
4508 3* SUBORDINATE ROUTINES CALLED: None. 
4509 FRECHE EAEEESEEEAEEAEEEEASAAASAAREAEEAAEAAAEAESAEREAAEAEAERAE REAL EAEAEEAREEEEE 
4510 
4511 031726 MSLGET:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

031726 004537 005474 JSR R5,PREGOS ;CALL REGISTER SAVE SUBRT. 

4512 + 
4513 Set up mask for removing unused bits in the test word, and clear unused 


4514 bits in the desired state word to allow direct comparison. 

4515 " 

4516 031732 005102 COM R2 ;GET MASK OF UNUSED BITS. 

4517 031734 040203 BIC R2,R3 sMASK OUT UNUSED BITS IN DESIRED STATE WORD. 
4518 3¢ 

4519 ; Handle the test and exit if we have a 0 time-out value. 

4520 a= 

4521 031736 005701 TST Ri sTEST THE TIME-OUT VALUE FOR ZERO. 

4522 031740 001011 BNE 2s sIF NON-ZERO TIME-OUT, GO LOOP AND TEST. 
4523 031742 011400 MOV (R4),RO ;GET THE WORD TO TEST BEFORE EXITING. 
4524 031744 010037 032040 MOV RO ,62$ sSAVE VALUE SO WE CAN RETURN IT. 

4525 031750 040200 BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 

4526 031752 020003 CMP RO,R3 sCOMPARE AGAINST DESIRED STATE WORD. 

4527 031754 000261 SEC sINDICATE SUCCESS IN CASE WORDS ARE EQUAL. 
4528 031756 001420 BEQ 6$ sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 
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4529 
4530 


031760 
031762 


031764 
031770 
031772 
031776 
032000 
032002 
032004 
032006 
032010 
032012 
032014 
032016 


032020 
022024 
032024 
032030 
032034 


032036 


032040 


000241 
0004 16 


013705 


013700 


010066 
010166 
004736 


000207 


000000 


002462 
032040 


032040 


000002 
000004 




















SEQ 0121 
- MSLGET - 


CLC sINDICATE FAILURE (TIME-OUT). 
BR 6$ sEXIT WITH FAILURE, WORDS AREN'T EQUAL. 
3* 


; Non-zero time-out value. Loop, waiting for condition or time-out. 


2s: MOV MSLCNT RS sLOAD MS LOOP COUNT. 

4$: MOV (R4),RO sGET THE WORD TO TEST. 
MOV RO,62$ sSAVE WORD IN CASE THIS IS THE LAST. 
BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 
CMP RO,R3 sCOMPARE AGAINST DESIRED STATE WORD. 
SEC sSET CARRY IN CASE OF SUCCESS. 
BEQ 6$ sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 
DEC RS sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
BNE as sLOOP IF MS NOT UP. 
DEC R1 sDECREMENT THE MS TIME COUNT. 
BNE 2$ sIF TIME NOT UP, LOOP TO COUNT ANOTHER MS. 
CLC sCLEAR CARRY, WE TIMED-OUT. 


3? 
; Have either found condition, or timed-out (possibly from 0 time-out value). 
; Restore the last contents read from the test word. Exit routine. 


6$: MOV 62$,R0 sPASS OUT THE LAST READ WORD. 

60$: PASS RO,R1 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV RO ,ROSLOT( SP) sPUT RO IN STACK SLOT. 
MOV R1,R1SLOTC SP) sPUT R1 IN STACK SLOT. 
JSR PC ,aCSP)-+ sRETURN TO PREGOS SUBRT. 


RO - LAST READ WORD CHECKED FOR CONDITION. 
3R1 - REMAINING TIME (O IF TIME-OUT OCCURED). 
RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 
; Local storage. 


62$: WORD 0 STORAGE FOR THE LAST READ WORD. 
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SEQ 0122 


4560 -SBTTL GLOBAL SUBROUTINE - MSLOOP - 
4561 I PROREOSEEEEEAEESESAEEEREEEREREDDADAEEEEEREREAEEEREEDEEEEEEE DEERE ED EE EEEEEEEDE 
4562 34 - Test Loop subroutine - 
4563 34 This subroutine is a general purpose test loop subroutine. It is used 
4564 i* to verify that ea certain action occurs before a time-out period. The 
4565 34 calling routine passes in which bits should be set and cleared for the 
4566 ;* desired condition and the time-out value in milli-seconds. 
4567 34 This routine checks for the desired condition upon entrance into the 
pene i* routine and then once each milli-second thereafter. 
;* 

4570 ;* INPUTS: Ri - Time-out value in milli-seconds (up to 64K ms). 
4571 34 R2 - Bit map of bits to test (1 indicates to test the bit). 
4572 3% R3 - Desired states of the indicated fields in R2. 
4573 34 R4 - Address of the word to test. 
ps de ;* MSLCNT - Milli second software loop count. 
4 ;* 
pe da 3* OUTPUTS: CARRY - Success flag (set if condition is met before time-out). 
4577 3* 
4578 3* CALLING SEQUENCE: JSR PC ,MSLOOP 
4579 :* 
4580 3* COMMENTS: This routine works with or without ea hardware clock, but the 
4581 34 calibration is only guarenteed when a line clock is available 
4582 3* on the system. 
4583 34 This routine can be used as a delay routine, by specifying the 
4584 3* desired delay as the time-out and specifying a condition to 
4585 74 look for which will not be met during the delay. 
4586 34 If a time-out value of 0 is specified, this routine checks for 
4587 :* the desired condition before returning. It indicates success 
ome 34 if the condition is met, failure otherwise. 
4589 34 
4590 ;# SUBORDINATE ROUTINES CALLED: MSLGET. 
4591 FHREERESERERASEEEAAS AREA EEEEEEAEEAEESAEAERSAREEARAARER EE EAEEAEERRE DRADER EERERERS 
4592 
4593 032042 MSLOOP:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 

032042 004537 005474 JSR R5 ,PREGOS sCALL REGISTER SAVE SUBRT. 
4594 
4595 i+ 
4596 ; Calling the MSLGET routine from the MSLOOP routine isolates the caller of 
4597 ; MSLOOP from the returned test word and remaining time-out values. 
4598 5° 
4599 032046 004737 031726 JSR PC ,MSLGET sCALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 
4600 
4601 032052 60$: PASS sRESTORE GPRS, 

032052 004736 JSR PC,a(SP)+ ;RETURN TO PREGOS SUBRT. 
4602 032054 000207 RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 
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—— 


032056 
032056 
032062 
032064 
032066 
032070 
032072 
032074 


032076 
032100 
032102 
032104 
032106 
032110 
032112 


032114 
032120 


032122 
032122 
032126 


032130 


004537 


012701 
000241 


010166 
004736 


000207 


005474 


177777 


000004 





- MUL16U - 


-SBTTL GLOBAL SUBROUTINE 
BOF SHORES EEEEEEEEEE EEE DE OEEEDEEEEE ODDS OE OEE O06 44 0000000000000000000000008 


- 16 Bit Unsigned Multiply Routine - 


3* 
3* CALLING SEQUENCE: 


This routine multiplies 2 16 bit unsi 
unsigned result. 


- MUL16U - 


d numbers and returns a 16 bit 


The multiplication is performed by iterative 


addition of one number to ea sum while decrementing the other number 
If overflow occurrs (177777 to 0) the product is invalid. 


Ri - Multiplicand (16 bit unsigned). 
R2 - Multiplier (16 bit unsigned). 


i - Product (16 bit unsigned), -1 if overflow. 
CARRY - Set if success (no overflow), clear otherwise. 


to zero. 


7% 
3* COMMENTS: 


;* 
;* 


JSR 


PC ,MUL16U 


Note: For minimum execution time R2 should contain the 
smaller of the 2 arguments. 


3* SUBORDINATE ROUTINES CALLED: None. 
5 ~~ SHRRERAEEESEEAEASEEEEEEE ERED EE EEEREE ODED OA EEED ED OEES OE EEE OO OE OE EEEE DEER EES 


MUL16U:: SAVE 


2s: 


60$: 


RTS 


JSR 


#-1,R1 


R1 
MOV 
JSR 


PC 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sCLEAR THE PRODUCT. 

sCHECK THE MULTIPLIER. 

sGO TO DO MULTIPLICATION IF NOT ZERO. 
sRETURN A PRODUCT OF ZERO. 

sINDICATE SUCCESS. 

sEXIT THE ROUTINE. 


sADD THE MULTIPLICAND TO THE PRODUCT. 
sEXIT WITH OVERFLOW IF ONE OCCURRED. 
sDECREMENT THE MULTIPLIER. 

sLOOP IF MULTIPLIER NOT ZERO. 
sPREPARE TO PASS OUT THE PRODUCT. 
sINDICATE SUCCESS. 

sEXIT WITH SUCCESS. 


sFORCE PRODUCT TO MAX VALUE, WE OVERLFOWED. 
sINDICATE FAILURE. 


sRESTORE GPRS, EXCEPT THE FOLLOWING: 
R1,R1SLOT(SP) sPUT Ri IN STACK SLOT. 
PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
; Ri - PRODUCT (16 BIT UNSIGNED), 

; CARRY - SET IF SUCCESS (NO OVERFLOW). 





SEQ 0123 
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GLOBAL SUBROUTINE - NEWCHR - 
4649 -SBTTL GLOBAL SUBROUTINE - NEWCHR - 
4650 5 O¢ SHRSEREREEEEEDREE EE OEEEDE DEED DEED EEEE DOO ES OOOO 060008 04000060000000000004008 
4651 3* - New Character Handling Routine - 
4652 is This subroutine handles a new character which has been read from 
4653 3* the DUT. ihe counters and pointers which are involved with the 
4654 3% character are updated. The character is checked for errors and 
pee 3% any errors which ere found are reported. 
6 3* 
4657 3;@ INPUTS: R2 - The read character including error flags and line number. 
4658 34 R3 - Mask of the inactives bits in a TX or RX char byte. 
4659 3* ACTLNS - Bit map of active DUT lines. 
4660 3% DPRSQB - Label at date pattern resync queues table base. 
4661 pe TXRXLB - Base of TX/RX line number association table. 
4662 :* BITTBL - Table of words with bits set for use in forming maps. 
4663 3% ERSMRF - “Print error summary for line” flags. 
4664 ;* ERRTBL - Error information CERRNBR, ERRMSG, ERRTYP). 
4665 7* ERCNTB - Base of the RX character error counters table. 
4666 ;* NDERPT - Contains number of char errors to report on a line. 
4667 3* INPUTS TO SUBROUTINES: CHCNTB, DPENDB, DPLEN, DPRSQE, EXCNTB, RXCNTB, 
4668 34 RXPTRB, ERRNBR, ERMSG, ERRTYP. 
4669 :* 
4670 3* OUTPUTS: ERRBLK - Contents destroyed. 
4671 ;* Following variables updated for line on which char was received: 
4672 3% DPRSQ - Date pattern resync que of received characters. 
4673 ;* ERCNT - Count of the number of character errors on line. 
4674 3% ERSMRF - Updated “print error summary for line” flags. 
4675 ;* EXCNT - Count of the number of extra chars received on line. 
4676 :* RXCNT - Count of the number of characters received on line. 
ra ;4 RXPTR - Updated to point to the next expected char on line. 
6 :* 
4679 +* CALLING SEQUENCE: JSR PC ,NEWCHR 
4680 3* 
4681 ;* COMMENTS: This routine can report errors with numbers Initial ERRNBR 
4682 ;* and Initiel ERRNBR + 1. ERRNBR is restored to its initial 
poe ;* value before this routine returns. 
468 i* 
4685 3* SUBROUTINES CALLED: CKCHR,CKINAC,TXROFF, TXRON. 
4686 s* INDIRECT SUBROUTINES: CHKEXT,CHKLOS,ER9002,ER9003, UPOCHR. 
4687 5 -~ REREREREERAEARAREE EE EREAAEEAEAREEAAEREEEAEEREREEEERAREEREEEEEREADREADALERRE 
4688 
4689 032132 NEWCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
032132 004537 005474 JSR R5,PREGOS ;CALL REGISTER SAVE SUBRT. 
4690 032136 010305 MOV R3,R5 sGET THE BIT MAP OF INACTIVE DATA BYTE BITS. 
4691 032140 052705 177400 BIS #177400,R5 sALL UPPER BITS OF EXPECTED DATA ARE INACTIVE. 
pots | 032144 005037 032410 oJ CLR 70$ ;CLEAR THE “ERROR FOUND” FLAG. 
46 i+ 
4694 ; If the new character is valid on an inactive line, go report error. 
4695 ; Routine used also extracts line number from the new character. 
4696 "he 
4697 032150 004737 030004 JSR PC ,CKINAC sCHECK FOR CHAR ON INACTIVE LINE. 
ee 032154 103043 BCC 4$ 3GO REPORT ERROR IF ON INACTIVE LINE. 
6 3¢ 
rd ; Push the new character on the resync que for this Line. 
1 g 
4702 032156 010304 MOV R3,R4 sCALCULATE BASE ADDRESS OF THE 
4703 032160 006304 ASL R4 ; DATA PATTERN RESYNCH QUEUE 
4704 032162 006304 ASL R4 ; (CQUEVE IS 4 WORDS LONG) FOR 


- 




























SEQ 0124 
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SEQ 0125 
GLOBAL SUBROUTINE - NEWCHR - 
4705 032164 062704 005052 ADD #0PRSQB,R4 ; THIS LINE. 
4706 032170 010401 MOV R4,R1 sGET THE BASE OF THE QUEUE. 
4707 032172 016121 000002 MOV 2(R1),(R1)+ sMOVE FROM CHR1 SLOT TO CHRO SLOT. 
4708 032176 016121 000002 MOV 2(R1),(R1)+ sMOVE FROM CHR2 SLOT TO CHR1 SLOT. 
44 032202 010211 MOV R2,(R1) sPUT NEW CHAR INTO CHR2 SLOT. 
a 3¢ 
4711 ; Check the DATA.VALID for the character at the botton of the queue. 
rie | ; If DATA.VALID is clear, exit the routine--nothing to analyze. 
471 3° 
4714 032204 011402 MOV (R4),R2 sGET CHRO VALUE, SET FLAGS. 
rake 032206 100076 BPL 60$ sEXIT ROUTINE IF DATA.VALID IS CLEAR. 
3* 
4717 ; Test for any of the error bits set in CHRO. 
4718 ‘i 
4719 032210 032702 070000 BIT #70000 ,R2 ;TEST FOR ANY CHRO ERROR BITS SET. 
rt 032214 001420 BEQ 2$ sSKIP THIS ERROR IF NO ERROR BITS SET. 
1 3+ 
4722 i We have at least one error flag set on the received char. 
4723 ; Report data error flag error if not in summary mode. 
4724 ‘ 
4725 032216 005337 032410 DEC 70$ sSET THE “ERROR FOUND” FLAG. 
4726 032222 016300 005364 MOV TXRXLBCR3),RO sGET THE TX LINE OFFSET FOR THIS RX LINE. 
4727 032226 036037 002534 002650 BIT BITTBLC(RO),ERSMRF ;CHECK THE ERROR SUMMARY FLAG FOR TX LINE. 
4728 032234 001010 BNE 2$ sIF ERROR SUMMARY FLAG SET, SKIP NEXT REPORT. 
4729 032236 012737 025566 005472 MOV #ER9003,ERRBLK ;SELECT THE ER9003 ERROR REPORT ROUTINE. 
4730 032244 004737 037074 JSR PC, TXROFF sTURN OFF TX AND RX DURING ERROR REPORTING. 
4731 032250 ERROR 3 >>>>> ERROR <<<cc<, 
032250 104460 TRAP CSERROR 
yh 032252 004737 037130 JSR PC, TXRON ;TURN TX AND RX BACK ON. 
;* 
phn ; Check the character at the bottom of the resync que for date errors. 
4736 032256 004737 027566 2s: JSR PC ,CKCHR s;CHECK THE CHRO CHAR FOR ERRORS. 
hid 032262 103424 BCS 6$ sSKIP ERROR REPORT IF CHRO IS CORRECT. 
8 3+ 
hed ; We have some sort of data error so report it (unless in summary report mode). 
40 i- 
4741 032264 005337 032410 4$: DEC 70$ sSET THE “ERROR FOUND” FLAG. 
4742 032270 016300 005364 MOV TXRXLBCR3),RO sGET THE TX LINE OFFSET FOR THIS RX LINE. 
4743 032274 036037 002534 002650 BIT BITTBL(RO),ERSMRF ;CHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
4744 032302 001014 BNE 6$ sSKIP ERROR REPORT IF ERROR SUMMARY FLAG SET. 
4745 032304 012737 025420 005472 MOV #ER9002,ERRBLK ;SELECT THE ER9002 ERROR REPORT ROUTINE. 
4746 032312 005237 005466 INC ERRNBR s;SELECT INITIAL ERRNBR + 1. 
4747 032316 004737 037074 JSR PC, TXROFF s;TURN OFF TX AND RX DURING ERROR REPORTING. 
4748 032322 ERROR ; >>>>> ERROR <<<c<, 
032322 104460 TRAP CSERROR 
4749 032324 004737 037130 JSR PC, TXRON ;TURN TX AND RX BACK ON. 
4750 032330 005337 005466 DEC ERRNBR sRESTORE INITIAL ERRNBR. 
4751 3¢ 
4752 ; Count e character error if one occurred. 
aan ; Update the “report error summary” flag for line based on error count. 
4754 4° 
4755 032334 005737 032410 6$: TST 70$ sCHECK THE “ERROR FOUND” FLAG. 
4756 032340 001421 BEQ 60$ sSKIP COUNTING AN ERROR IF FLAG IS CLEAR. 
4757 032342 005263 003452 INC ERCNTBC(R3) sINCREMENT THE ERROR COUNTER FOR THIS LINE. 
4758 032346 001002 BNE 8$ sSKIP SETTING COUNTER TO MAX IF NO OVERFLOW. 
4759 032350 005363 003452 DEC ERCNTBC(R3) sRESET THE ERROR COUNTER TO -1 (MAX VALUE). 


—— 
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4760 
4761 
4762 
4763 
4764 
4765 
4766 
4767 


4768 
4769 
4770 


r-— 


032354 
032360 
032362 
032370 
032372 
032376 


032404 
032404 
032406 


032410 


005737 
001411 
026337 
103405 
016300 
056037 


004736 
000207 


000000 





002264 
003452 


005364 
002534 
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- NEWCHR - 
8$: TST NDERPT sDISABLE ERROR SUMMARY FUNCTION IF 
BEQ 60$ ; NUMBER OF DATA ERRORS TO REPORT IS 0. 
002264 CMP ERCNTBCR3),NDERPT ;COMPARE ERROR COUNT WITH @ OF ERR’S TO RPT. 
BLO 60$ sSKIP SETTING OF SUMMARY FLAG IF NOT TOO MANY. 
MOV TXRXLBC(R3),RO  ;GET THE TX LINE OFFSET FOR THIS RX LINE. 
002650 BIS BITTBL(RO),ERSMRF ;SET “PRINT ERROR SUMMARY” FLAG FOR LINE. 
60$: PASS sRESTORE GPRS. 
JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC 
70$; -WORD 0 sLOCAL STORAGE FOR ERROR OCCURRED FLAG. 


SEQ 0126 
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-— 


4772 
4773 
4774 
4775 
4776 
4777 
4778 
4779 
4780 
4781 
4782 
4783 
4784 
4785 
4786 
4787 
4788 
4789 
4790 
4791 


4792 
4793 


4794 
4795 


4796 


4797 
4798 


4799 
4800 
4801 


032412 
032412 


032416 
032416 
032420 
032422 
032424 


032426 
032426 
032432 
032436 
032440 
032442 
032446 
032446 
032450 
032452 
032452 
032454 


032456 
032461 
032464 
032467 
032472 
032475 
032500 
032503 
032506 
032511 
032514 
032517 
032522 
032525 
032530 
032533 


004537 


104454 
000145 
032456 
000000 


012746 
012746 
010600 
104417 
062706 


104422 
000776 


004736 
000207 


110 
124 
117 
125 
122 


005474 


032542 
000001 


000004 





- OOPS - 


123 
103 


-SBTTL GLOBAL SUBROUTINE - OOPS - 

5 t+ RERREAREAEEEEREE EEE EEEEEE EEO REED ODES OS OE EEE EE OEE OEOEEEDE ERED EE EREEEEEES 
3* - Program abort subroutine - 

;* This subroutine is used to abort the program when a fatel error is 

i* detected in the program or the host system hardware. An error message 
;* is printed giving some information about the nature of the abort. 

te 

3* INPUTS: Rl - Error code giving reason for abort. 

3* 

3* OUTPUTS: An error message is printed. 

3% A list of return PC values for all subroutine calls is printed. 


3* 
s# CALLING SEQUENCE: JSR PC OOPS 


3 

;* COMMENTS: 

7* 

;* SUBORDINATE ROUTINES CALLED: None. 

i-- SEREEEEAEREEEEREEEEAEAAREEEEERESAEEAEEEEEEEAEREAEAARAREREEEEEAEARERRREERERS 


OOPS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
; REPORT “HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED.” ERROR. 
ERRSF 101,€M0101 
TRAP CSERSF 


-WORD 101 
-WORD EMO101 
-WORD 0 


; REPORT “PROGRAM HUNG, WAITING FOR A CONTROL-C. ” 
PRINTF #€M0102 


MOV #EM0102, - 
MOV #1,-(SP) 


MOV SP ,RO 
TRAP CSPNTF 
ADD 04 ,SP 
2s: BREAK sLOOK FOR OPERATOR CONTROL-C INPUT. 
TRAP C$BRK 
BR 2s sINFINITE LOOP. 
60$: PASS ;D0N'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 


JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC ; ROUTINE IN THE FUTURE, SO BE CONSISTANT. 


EM0101:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED. / 





SEQ 0127 


(SP) 








CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 92-1 
GLOBAL SUBROUTINE - OOPS - 
032536 105 104 056 
4802 032542 045 116 tc EMO102:: .ASCIZ /SNSAPROGRAM HUNG, WAITING FOR A CONTROL-C. <eeeeeeseseeaasNaN/ 


032545 101 120 12 
032550 117 107 122 


SEQ 0128 


4803 -EVEN 


io 






































4837 
4838 


032640 
032640 
032644 
032650 
032654 
032660 
032664 
032666 


032670 
032670 
032672 
032676 
032702 
032706 
032710 
032712 
032716 
032716 
032720 


004537 
013701 
013702 
042703 
053703 
010311 
011204 


010446 
012746 
012746 
012746 
010600 
104415 
062706 


004736 
000207 





005474 
002300 
002304 
177760 
002374 


023407 
010310 
000003 


000010 


- PRTLPR - 
-SBTTL GLOBAL SUBROUTINE 
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- PRTLPR - 


b¢¢ S66060066000000606 0660000006 00000000 060000 000000000000000000000000000000008 
-Print the contents of the LPR. 


gk 
3% 


60$: 


This routine is used to print out extended information on the 


contents of the Line Parameter Register (LPR). 


OUTPUTS: 


R3 - Contains the number of the line 
CSRA - Contains the address of the D 


‘s CSR. 


ou wish to examine. 


IESTAT - Contains the current status of the TX and RX interrupt 
enable bits in the DUT’s CSR. 


LPRA - Contains the address of the DUT’s LPR register. 


An extended information message is printed on the operators 


console. 


CALLING SEQUENCE: JSR 


COMMENTS: 


PC,,PRTLPR 





This routine changes the indirect address field of the device 
under test's CSR. 


3# SUBORDINATE ROUTINES CALLED: NONE. 
b-- 86666060660606 66 666006000606000006000000000000660600000000000000000000000000 


PRTILPR: : SAVE 


#177760,R3 
IESTAT,R3 
R3,CR1) 
(R2),R4 


sSAVE CONTENTS OF GPRS RO THRU RS. 





RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


sGET THE CSR ADDRESS. 
sGET THE LPR ADDRESS. 
sCLEAR ANY UNWANTED BITS. 


sSET STATE OF TX AND RX INTERRUPT ENABLE BITS. 


sSELECT LINE. 
sGET CONTENTS OF THE LPR. 


sPRINT MESSAGE “CONTENTS OF THE LPR:annnnn” 


PRINTX @€F9019, @EM9026,R4;PRINT OUT MESSAGE ON OPERATORS aa 


PASS 
RTS 


JSR 
PC 





sRESTORE GPRS. 
PC ,8(SP)-+ 


sRETURN TO PREGOS SUBRT. 


g. 
R4, -(SP) 


#€M9026, -( SP) 
#€F9019, -( SP) 


@3,-(SP) 
SP 








4859 032722 

032722 
4860 032726 
4861 032732 


4863 032736 
4864 032740 


4869 032742 
4870 032746 
aark 032750 


4875 032752 
4876 032756 
4877 032760 
4878 032762 


4880 032766 
4881 032770 
4882 032772 
4883 032774 
4884 032776 


4888 033002 








005474 
001000 
002302 


070000 


000300 


035624 


- PUFIFO - 


-SBTTL GLOBAL SUBROUTINE 
SPOOSRESESSSSSESSSESSEDESEES OSES ESESEEEEEEEE DEES EEESESEEEDEDEEEEREDEDEEEEEEOEE 





38 - PURGE THE FIFO 

3% This routine tries to remove all the cheracters from the FIFO. 

3% Any BMP codes that ere found ere saved on the BMP code queue. 

3% 

3 INPUTS: RBUFA- Contains the address of the Receiver. 

3% 

34% 

3* OUTPUTS sored bit - Indicates the state of the fifo, set:= purged. 
re BMPCQ - The contents of the BMP code queue may be updated. 
3% 


s# CALLING SEQUENCE: 


* 
s# COMMENTS: 


3% 
s# SUBORDINATE ROUTINES CALLED: SAVBMP. 
§OOS6806 666666 6606606600 0000 060606 0000600000000000000000000000600000000000000000 


PUFIFO: : SAVE 

MOV 

MOV 

2s: MOV 
BPL 


3¢ 
s Check if the read character is actually a BMP code. 
s If it is, then save it on the BMP 


3 a 
MOV 
BIC 
BNE 


3¢ 
; Check if the read date is modem status , BMP or Selftest?. 


3 ~ 
MOV 
BIC 


4$: DEC 
BNE 


6%: SEC 


#512.,R1 
RBUFA,R4 


(R4),R2 
6% 
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JSR 


JSR 


#70000 ,RO 


R2,RO 
4% 


#300 ,RO 
R2,RO 
4% 


PC ,SAVBMP 


2s 


JSR 







SEQ 0130 


- PUFIFO - 













PC ,PUFIFO 










sSAVE CONTENTS OF GPRS RO THRU RS. 

RS, PREGOS sCALL REGISTER SAVE SUBRT. 
sSET MAXIMUM TRY COUNT OF 512. 

sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 


sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
sEXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 









code queue to be reported later. 


sGENERATE A BIT MAP OF CHAR ERROR BITS 
s_ WHICH ARE NOT SET FOR CHAR. 
sTHROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 







s_ CHECK IF BMP OR SELFTEST?. 

sTRY TO CLEAR BMP FLAGS IN THE READ DATA. 

sIF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 
sSAVE BMP CODE ON THE QUEUE. 


sDECREMENT THE TRY COUNT. 

sLOOP TO TRY AGAIN. 

sCLEAR CARRY,TO INDICATE FIFO NOT PURGED. 
sEXIT WITH CARRY CLEAR. 

sSET CARRY, TO INDICATE FIFO PURGED. 


sRESTORE GPRS, 
PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
sCARRY BIT, SET INDICATES FIFO PURGED. 



















CVOMEBO DHV11-M TEST, ORION UFD MACRO Y0S.02 Wednesday 08-May-85 10:16 Page 95 


GLOBAL SUBROUTINE 


4918 033004 

033004 
4919 033010 
4920 033014 


4925 033020 
4926 033024 


4930 033026 
4931 033032 
4932 033034 


4937 033036 
4938 033044 
4939 023050 
4940 033052 
4941 033054 
4942 033060 


004537 
013746 
012705 


017702 
100057 


012700 
040200 
001012 


012737 
012700 
040200 
001003 
004737 
000424 


005474 
005466 
001000 


147256 


070000 


025330 
000300 


035624 





- PUFIFR - 
-SBTTL GLOBAL SUBROUTINE - PUFIFR - 
FORSHEE EE SEEEEEOSEEESESESEEESSHEEEDESEEESEOEEEESEREEREEEEEEESEEEREEEEEEEDEDE 
:¢ - Purge FIFO report any errors found. 
36 This routine removes ell dete from the FIFO. Any BMP codes thet are 
36 “cwnd ere save on the queve to be reported later in the BMP report test. 
34 y unxepected date (ie any non-status inforamtion) that ere found, 
3¢ * feported es en error. 
:¢ 4, the FIFO will not purge after 512 attempts, then the current test 
3@ that called this routine receives a failure flag that should be used 
;* to abort the test. 
34 
3@ INPUTS: ERRTBL - ERRTYPE, ERRMSG, ERRNBR ere set up correctly. 
34 RBUFA- Contains the address of the Receiver. 
34 
3@ OUTPUTS: Carry bit - Abort test flag, Clr = ABORT TEST, Set = OK. 
34 ERRBLK - Value will be destroyed. 
34 BMPCQP - The BMP code queue pointer may be updated. 
34 The contents of the BMP code queue may be udeted. 
34@ 
3# CALLING SEQUENCE: JSR PC ,PUFIFR 
;* 
3@ COMMENTS: This routine reports errors with numbers initial ERRNBR 
34 thru to ERRNBR-2. 
34 The ERRNBR is restored to its INITIAL value before returning. 


005472 


3% 
3# SUBORDINATE ROUTINES CALLED: ER1603,ER9001,ER9002,SAVBMP. 
SPORES EEE EEE EEEE OEE 644604664404 0400 004444 EEEEEEEDEEESS 


PUFIFR: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV ERRNBR , - (SP) sSAVE THE CONTENTS OF THE ERROR NUMBER. 
MOV #512.,R5 sSET MAXIMUM READ COUNTER TO 24FIFO SIZE. 


3¢ 
; Read data from the FIFO until DATA VALID is clear of read counter is zero. 
; Report any BMP or Unexpected data as errors. 


2$: MOV ORBUFA,R2 sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
BPL 8s sEXIT IF DATA VALID CLEAR, ie. FIFO PURGED. 
3° 
; Check if read data is status or unexpected character. 
- 


MOV #70000 ,RO sGENERATE A BIT MAP OF CHAR ERROR BITS 
BIC R2,RO ; WHICH ARE NOT SET FOR CHAR. 
BNE as sSKIP BMP CHECK IF IT IS UNEXPECTED DATA. 


3¢ 
; Check if the read data is modem status , BMP or Selftest?. 
; If it is a BMP code then save it on the queue. 


: MOV @ER9001,ERRBLK ;SET UP THE CORRECT ERROR REPORTING ROUTINE. 


MOV #300 ,RO ' s CHECK IF BMP OR SELFTEST?. 

BIC R2,RO sTRY TO CLEAR BMP FLAGS IN THE READ DATA. 
BNE 4$ sSKIP BMP ERROR REPORT IF MODEM OR SELFTEST?. 
JSR PC ,SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 

BR 6$ sBRANCH TO CHECK READ COUNT. 


3* 
; Check if the read data is Modem, Selftest or Unexpected data. 
- 
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GLOBAL SUBROUTINE 


4954 033112 
4955 033116 


4957 033124 
033124 
4958 033126 


4960 033132 
4961 033134 


4966 033136 
4967 023144 
4968 033152 


4971 033156 

033156 
4972 033160 
4973 033162 


4975 033164 
4977 033166 


4978 033172 
033172 


4981 033174 


032702 
001421 
012701 
010203 
000303 
042703 
006303 
052704 
005237 
012737 


104460 
005337 


005305 
001331 


062737 
012737 
012701 


104460 
000241 
000401 
000261 
012637 


004736 


000207 


005466 


000002 
025034 
023052 


005466 





- PUFIFR - 
43; BIT 


005472 MOV 


6$: DEC 


3° 


*BITO,R2 
6$ 


9€M9104,R1 
R2,R3 

R3 
#177760,R3 
R3 


$B81T15,R4 
ERRNBR 
ER9002 , ERRBLK 


sTEST THE MODEM STATUS INDICATION BIT. 

s00 NOT REPORT ANY ERROR IF MODEM STATUS. 
sPASS THE CORRECT ERROR MESSAGE TO REPORT. 
sEXTRACT THE LINE NUMBER FROM 

s THE READ DATA. 


; 

sFORM LINE NUMBER TIMES 2 FOR ER9002 ROUTINE. 
sSET THE “NONE” EXPECTED MAESSAGE FLAG. 

sSET ERROR NUMBER TO INTIAL ERRBR+1. 

sSELECT THE CORRECT ERROR REPORTING ROUTINE. 


ERROR “UNEXPECTED DATA FOUND IN FIFO”. 


ERRNBR 


RS 
es 


; >>>>> ERROR <<<cc, 
TRAP 
sRESTORE ERROR NUMBER TO INTIAL ERRNBR. 


sDECREMENT READ COUNTER. 
sLOOP TO READ NEXT CHAR FROM FIFO IF COUNT > 0. 


CSERROR 


; The FIFO will not clear, report the error and indicate that the test is to 


; be ABORTED. 

005466 ADD 

005472 MOV 
MOV 


sREPORT THE ERROR “FIFO 


; 
ERROR 


cLC 
BR 


8$: SEC 


10$: MOV 
60$: PASS 


RTS 


#2 ,ERRNBR 
€R1603, ERRBLK 
9€M9017,R1 


10$ 

(SP)+, ERRNBR 
JSR 

PC 


sSET ERROR NUMBER TO INTIAL ERRNBR:2. 
sSELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 
WILL NOT PURGE, (DATA VALID STUCK SET)” 
“222222 TEST ABORTED”. 
; >>>>> ERROR <<<<cc, 
TRAP CSERROR 
sINDICATE THE TEST IS TO BE ABORTED. 
sEXIT THIS ROUTINE AND ABORT THE CURRENT TEST. 


sSET THE CARRY, DO NOT ABORT THE TEST. 


sRESTORE INITIAL ERROR NUMBER. 
sRESTORE GPRS, 


PC,@(SP)- sRETURN TO PREGOS SUBRT. 


sCARRY BIT, SET INDICATES FIFO PURGED, DO NOT 
; ABORT THE TEST. 





SEQ 0132 
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GLOBAL SUBROUTINE 


4983 


5004 033176 
023176 


5006 033202 
5007 033206 
5008 033212 
5009 033216 
5010 033220 
5011 033224 


5013 033226 
033226 
5014 033230 


-— 


004537 


012701 
012721 
012721 
005021 
020127 
101774 


004736 
000207 


005474 
003062 
003070 
003070 


003270 





- PURRXB - 


rr ge 
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-SBTTL GLOBAL SUBROUTINE 
ieee SEERA RESEEEEEEEEDEREREDEEEESEEEEEEEAAEEEEESHEEEEEEEEDEEEEEEEEEDEEREDEEEDE 
- Purge the RX Buffer in Memory Routine - 

This subroutine is used before the beginning of a TX/RX of data 
patterns to clear out the RX buffer and to initialize the various 
counters and pointers related to that buffer. 


RXBSTA - Label at the beginning of the RX buffer. 


; 
3# INPUTS: 


34 
3# OUTPUTS: 


at 
;* 
;* 


PURRXB: : 


2s: 


60$: 


SAVE 


- PURRXB - 


RXBCNT - Count of @ of chars in RX buffer (Cleared). 
RXBIPT - Input pointer to RX buffer (Initialized). 
RXBOPT - Output pointer to RX buffer (Initialized). 
The contents of the RX BUFFER are cleared. 


;* 

3# CALLING SEQUENCE: JSR 
3* 

3;* COMMENTS: 


3* 
:* SUBORDINATE ROUTINES CALLED: None. 
5 ~~ SHRRREEEEEAEEREEEEAEAAEAAAERESEAASAAER AAA HEARSE DARE EERALE DAES ELERESERERELS 


JSR 


@RXBOPT,R1 
ORXBSTA,(R1)+ 
ORXBSTA,(R1)+ 
(R1)+ 

R1, @RXBEND 

2$ 


JSR 
PC 


PC ,PURRXB 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


sGET THE ADDRESS OF THE RX OUTPUT POINTER. 
sINITIALIZE THE RX BUFFER OUTPUT POINTER. 
sINITIALIZE THE RX BUFFER INPUT POINTER. 
sCLEAR CHAR COUNT AND THE BUFFER AREA. 
sCHECK IF LAST LOCATION HAS BEEN CLEARED. 
;sLOOP IF NOT DONE. 


sRESTORE GPRS. 


PC,@(SP)+ sRETURN TO PREGOS SUBRT. 





SEQ 0133 





RA 
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SEQ 0134 
GLOBAL SUBROUTINE - ROCHRS - 
5016 -SBTTL GLOBAL SUBROUTINE - ROCHRS - 
5017 BB Melee htt titi t Litt tT LTT TTT TT TT TTT TTT TT TTT TTT Tet Ts 
5018 34 - Read and Compare Input Characters Routine - 
5019 34 This subroutine reads the characters from the RX buffer in memory . 
5020 34 If characters stop appearing in the buffer with DATA.VALID set 
5021 34 or if more than the allowable number of characters has been read from 
5022 34 the buffer this routine exits with an RX complete indication. 
pees i* Each read char is analyzed and any necessary errors are reported. 
3* 
5025 3@ INPUTS: ACTLNS - Bit map of the active DUT Lines. 
5026 3* ERRNBR - Set to error number of first error in this routine. 
5027 3% IBM - Mask of the inactive bits in a TX or RX char byte. 
5028 34 OSTEND - Address of the end of the output stor fifo buffer. 
5029 34 OSTPTR - Pointer to the next byte to read from OSTORE. 
5030 34 RXBOPT - Pointer into the RX char buffer in memory . 
pees 34 RXTOUT - Time-out value for RX of last char. 
2 3% 
5033 3# OUTPUTS: Error messages may be printed at the operator's console. 
5034 3* TXOBLF - TX/RX disabled flag (Cleared). 
5035 3* TXENBM - TX.ENABLE state mask (Destroyed). 
5036 34 SAVPRI - Storage for processor priority (Destroyed). 
ed 3* SAVTEN - Storage for TX.ENABLE states (Destroyed). 
;* 
rece 3* ©" LING SEQUENCE: JSR PC ,,ROCHRS 
040 3* 
5041 3;* _JMMENTS: This routine reports errors with numbers Initial ERRNBR 
5042 76 thru Initial ERRNBR + 4. 
oan 3* ERRNBR is restored before this routine returns. 
044 7* » 
5045 ;* SUBROUTINES CALLED: CKCHR , NEWCHR ,REPCOD,RXIEO,RXIE1, TXENBL , TXIEO, TXIE1, 
5046 7* WAIBIS. 
5047 elated thet LI LE Li TTT TL it Litt itt TTT TTT TTT TTT TT TTT TTT TTT Ter TTT Tees 
5048 
5049 033232 ROCHRS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
033232 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
5050 033236 013704 005466 MOV ERRNBR ,R4 sPRESERVE THE INITIAL ERROR NUMBER. 
5051 033242 013703 002366 MOV IBM,R3 sGET THE INACTIVE BIT MASK. 
5052 033246 005037 002656 CLR TXDBLF ;CLEAR THE TX DISABLED FLAG. 
5053 033252 004737 035600 JSR PC ,RXIE1 ;TURN ON DUT RECEPTION INTERRUPTS. 
oe 033256 004737 036574 JSR PC, TXIE1 sTURN ON DUT TRANSMISSION INTERRUPTS. 
055 
5056 3¢ 
ae ; Clear all resyne queues for all lines. 
058 8- 
5059 033262 012701 005052 MOV #DPRSQB,R1 sGET BASE ADDRESS OF RESYNC QUEUES TABLE. 
5060 033266 012702 005252 MOV #DPRSQE ,R2 ;GET END ADDRESS OF RESYNC QUEUES TABLE. 
5061 033272 005021 2s: CLR (R1)+ ;CLEAR A WORD OF THE TABLE. 
5062 033274 020102 CMP R1,R2 sCHECK IF POINTER AT END OF TABLE. 
feos 033276 103775 BLO 2$ ;LOOP UNTIL TABLE IS CLEAR. 
064 i+ 
5065 ; Wait for e character to appear in the FIFO. 
ace ; If no character appears within time-out period: exit routine, we're done. 
06 s- 
5068 033300 013701 002402 4$: MOV RXTOUT,R1 sGET TIME-OUT FOR SLOWEST BAUD RATE IN USE. 
5069 033304 023737 002652 002272 CMP TXDONF , ACTLNS sCHECK FOR TRANSMISSION DONE ON ACTIVE LINES. 
5070 033312 001402 BEQ 6$ sSKIP ADDING 50 MS DELAY IF TX DONE ALL LINES. 
5C71 033314 062701 000062 ADD #50. ,R1 sADD SO MILLI SEC TO DELAY IF NOT LAST CHAR. 











CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 97-1 
GLOBAL SUBROUTINE 


5072 033320 
5073 033324 
5074 033330 
5075 033334 


5077 033336 


5083 033342 
5084 033346 
5085 033350 
5086 033356 
5087 033360 
5088 033364 
5089 033370 
5090 033376 
5091 033400 
5092 033402 
5093 033406 
5094 023412 
5095 033416 
5096 033420 


5098 033420 
5099 033424 
5100 033426 
5101 033432 
5102 033436 


5107 033444 
033444 
5108 033446 


5112 033450 
5113 033454 
5114 033456 


5120 033460 
5121 033464 
5122 033470 
5123 033474 


052701 
013702 
004737 
103073 


004737 


012737 


104460 
000452 


012700 
040200 
001007 


010437 
005237 
004737 
000407 


170000 
003062 
037740 


031052 


002656 
003066 


035600 
002410 
003066 


000340 
036446 
002656 


002646 


005466 
023313 
024644 


070000 


005466 
005466 
034350 





- ROCHRS - 
6$: BIS #170000,R1 sINDICATE TO TEST DATA.VALID BIT. 
MOV RXBOPT ,R2 sINDICATE TO CHECK MEMORY RECEIVE BUFFER. 
JSR PC ,WAIBIS sWAIT FOR RECEIVED CHAR OR TIME-OUT. 
BCC 18$ sEXIT ROUTINE IF TIME-OUT, WE'RE DONE. 
JSR PC .GETCHR sREAD A CHARACTER FROM THE MEMORY BUFFER. 


3¢ 

; Check if the TX ISR is disabled. 

; Re-enable RX ISR if the space for new chars is low enough. 

; If the buffer can accomodate more chars then re-enable transmission. 


8$: TST TXOBLF sCHECK IF TX IS DISABLED. 
BPL 10$ sSKIP RX/TX CHECK IF TX NOT DISABLED. 
000020 CMP RXBCNT,@RXBETX ;COMPARE BUFFER COUNT WITH LEVEL TO ENABLE RX. 
BHI 10$ ;SKIP ENABLE RX IF BUFFER TOO FULL. 
JSR PC ,RXIE1 sENABLE RECEPTION INTERRUPTS. 
MOV TXENBM,RS sGET THE PRESERVED TX.ENABLE STATES. 
000020 CMP RXBCNT,@RXBETX ;COMPARE BUFFER COUNT WITH LEVEL TO ENABLE TX. 
BHI 10$ s;SKIP ENABLING TX IF BUFFER TOO FULL. 
MFPS Ri sSAVE THE CURRENT PROCESSOR PRIORITY. 
MTPS #PRIO7 sDISABLE INTERRUPTS. 
JSR PC, TXENBL sENABLE TRANSMISSION. 
CLR TXOBLF ;CLEAR THE TX DISABLE FLAG. 
MTPS R1 ;RE-ENABLE INTERUPTS. 
10$: 
DEC CHRTOT sDECREMENT THE TOTAL CHAR COUNTER. 
BNE 12$ sSKIP ERROR IF NOT TOO MANY RECEIVED. 
MOV R4,ERRNBR sSET ERROR NUMBER TO INITIAL ERRNBR. 
MOV #EM9025,R1 sSELECT THE PROPER ERROR MESSAGE. 
005472 MOV #EROSO3,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 


i+ 
; Report error at Initial ERRNBR. 
; “MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED. “ 


ERROR : >>>>> ERROR <<<c<, 
TRAP CSERROR 
BR 60$ sEXIT THE ROUTINE, WE'RE GIVING UP. 
7+ 
; Determine if the character is data or a status code. 
12$: MOV #70000 ,RO s;GENERATE A BIT MAP OF CHARACTER ERROR BITS 
BIC R2,RO ; WHICH ARE NOT SET FOR THE CHARACTER. 
BNE 14$ sSKIP REPORTING OF ERROR CODE IF WE HAVE CHAR. 


3¢ 

; The data is either a BMP code or a Modem Status code. 

; Report that the code was found. 

; Errors reported with error numbers >>>>> ERRNBR+1 and ERRNBR+2 <<<<<, 


MOV R4,ERRNBR ;GET THE ERROR NUMBER PASSED INTO THIS ROUTINE. 
INC ERRNBR sSET ERROR NUMBER TO INITIAL ERRNBR+1. 

JSR PC ,REPCOD sREPORT THE BMP OR MODEM STATUS CHANGE CODE. 

BR 16$ ;BRANCH TO GET THE NEXT CHARACTER. 


i? 
; The data is a valid character: 

F Compare the read data with the expected data. 
; Update expected data pointer. 





SEQ 0135 
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GLOBAL SUBROUTINE 


5130 033476 
5131 033502 
5132 033510 


5139 033514 
5140 033520 
5141 033522 


5145 033524 
5146 033530 
5147 033534 
5148 033536 
5149 033540 
5150 023544 
5151 033550 
5152 033552 
5153 033556 
5154 033560 
5155 033562 
5156 033564 
5157 033566 
5158 033572 


5160 033574 
5161 033600 

033600 
5162 033602 


010437 
062737 
004737 


005466 
000003 
032132 


031052 


035546 
036242 


032132 
000400 
000010 


100000 


005466 





- RDOCHRS - 
F Errors reported with error numbers >>>>> ERRNBR+3 and ERRNBR+4 <<<c<, 


005466 


»* 

14$: MOV 
ADD 
JSR 


3? 


R4,ERRNBR 
#3 ,ERRNBR 
PC ,NEWCHR 


sCALCULATE THE STARTING ERROR NUMBER FOR THE 
; NEXT ROUTINE CALL CINITIAL ERRNBR+3). 
sHANOLE THE NEW DATA CHARACTER. 


3 Done processing this character. 

; Read another char from the DUT FIFO. 

; If DATA.VALID is set, loop to check the received character. 
; If DATA.VALID is clear loop to wait for it set or time-out. 


ae 
16$: JSR 
BCS 
BR 


3¢ 


; Use dummy characters to force 


20$: JSR 


60$: MOV 


PC ,GETCHR 
8$ 
as 


PC ,RXIEO 
PC, TXDONE 
Re 


R1 


PC ,NEWCHR 
#400 ,R2 


#100000,R1 
20$ 


R4,ERRNBR 


JSR 
PC 


sREAD A CHARACTER FROM THE RX BUFFER. 
sIF DATA.VALID SET, GO TO CHECK THE RX CHAR. 


sLOOP TO WAIT CHAR OR TIME-OUT IF BUFFER EMPTY. 


analysis of characters in resync queues. 


sTURN OFF DUT RX INTERRUPTS. 

sCHECK IF TX DONE, TURN OFF DUT TX INTERRUPTS. 
sCLEAR THE DUMMY CHARACTER. 

sCLEAR THE LOOP COUNTER. 

sFORCE ONE RESYNC QUE CHAR TO BE ANALYZED. 
sINCREMENT THE LINE NUMBER IN THE DUMMY CHAR. 
sINCREMENT THE LOOP COUNTER. 


sTEST FOR LOOP COUNTER EQUAL TO @ OF DUT LINES. 


sLOOP IF LOOP COUNT IS NOT ALL LINES DONE. 
sCHECK FOR SECOND TIME AROUND OUTER LOOP. 
sEXIT IF OUTER LOOP DONE TWICE. 


sCLEAR THE DUMMY CHAR FOR 2ND TIME AROUND LOOP. 


sCLEAR LOOP COUNT, SET OUTER LOOP FLAG. 
sLOOP THE SECOND TIME AROUND OUTER LOOP. 


sRESTORE THE ERROR NUMBER TO ITS INITIAL VALUE. 
sRETURN TO PREGOS SUBRT. 


sRESTORE GPRS. 
PC,@(SP)+ 





SEQ 0136 
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GLOBAL SUBROUTINE 


5185 033604 

023604 
5186 033610 
5187 033614 


5191 033616 
5192 033624 


5196 033630 
033630 


5198 033632 
033632 
5199 033634 


r-— 


004537 
013702 
001406 


012737 


012701 


104460 


004736 
000207 


005474 
002420 


026466 
023703 


- ROMAST - 


005472 





-SBTTL GLOBAL SUBROUTINE - RDOMAST - 

b+ + SEROROEEERERED ODES 4466600440606 06041 OO Oo OOOO Ohhh hh ek ee eeeee 
34 - Report DMA_START Bit Errors Routine - 

;* This subroutine checks for lines which have DMA_START bit errors 

7* during the just completed DMA transmission. If any are found, 

;* they are reported. 

3* 

;* INPUTS: ERRMSG - Address of primary error message for this routine. 

3* ERRNBR - Error number of error reported in this routine. 

34 TXINTF - Contains bit map of lines with DMA_START bit errors. 
;* 

3* OUTPUTS: ERRBLK - Address of the error reporting routine (Destroyed). 

;* Messages may be printed at the operator console. 

;* , 

3* CALLING SEQUENCE: JSR PC ,RDMAST 

3* 

:* COMMENTS: If no Lines have DMA_START bit errors, no messages are printed. 


tk 
;* SUBORDINATE ROUTINES CALLED: ER9102. 
i-- SERRE RESEREEREEESEREEEEAEAREERASEAEEREASEEEEEEAERAEEARRAEEEREREREE EERE REEDS 


RDMAST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV TXINTF ,R2 sGET COPY OF THE DMA_START ERRORS BIT MAP. 
BEQ 60$ sEXIT IF NO DMA_START ERROR BITS ARE SET. 


3* 
; We have some DMA_START bit errors to report. 


; MOV #ER9102,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 


MOV #EM9102,R1 sINDICATE THAT WE HAVE DMA_START BIT ERROR. 
7¢ 
; Report “DMA_START BIT SET AFTER RESET OR TX.ACTION ... ON LINES(S):” 
: ERROR ; >>>>> ERROR <<<<<, 


TRAP CSERROR 


60$: PASS sRESTORE GPRS. 
- - JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
s 


















SEQ 0137 
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_——— rr er 


$201 -SBTTL GLOBAL SUBROUTINE - ROPOR - 
5202 FPRREEESEEREEEEAEEEEEE SEED EEDA REDE EEOREEEE SOD OE ERED EEE OS OOOO 044446 O4OE EERE EEE 
5203 3* - Read and verify Data Pattern from Device Registers Routine - 
$204 ;* This routine reads and verifies the rotated deta pattern which has 
5205 3* been written by the WOPDR subroutine. 
5206 34 Each active line's register's contents is read and compared with the 
5207 34 written date. 
5208 ;* After the unused and Read Only (RO) bits are masked out, any errors are 
5209 3* reported from this routine. 
5210 3% This routine will take into account the type of write operation which 
a. 3* wes performed by the WDOPDR subroutine. 
1 i* 
$213 ;* INPUTS: R2 - Used to pass in the data pattern to be rotated & verified. 
5214 7% R3 - Byte indicator (- => lo byte, + => hi byte, 0 => both). 
5215 3% R4 - Operation type indicator (- => BIC, + => BIS, 0 => MOV). 
5216 3 ACTLNS - Bit map of active lines on the device under test. 
5217 3* \ CSRA - Contains the CSR address of the Device under test. 
5218 34 DRADRT - Base address of device register address table. 
5219 7% ERCNTB - Label at base of error counters table for lines. 
5220 :* ERRMSG - Set up with the proper error message for this test. 
$221 3* ERRNBR - Set up with the proper error number. 
5222 ;* LPRO - Equated to LPR reg offset from device CSR address. 
$223 3* NUMLNS - Number of lines on the device under test. 
5224 3* NDERPT - Number of individual data errors to report on a line. 
5225 3* TXBFCO - Equated to TBUFFCT reg offset from device CSR address. 
— :* UNBTTB - Base address of the unused bit table. 
2 i* 
5228 3* OUTPUTS: Error messages may be printed at the operator's console. 
5229 7% ERCNT - Error counters table is updated for line under test. 
5230 7% ERRBLK - Contents destroyed. 
5231 7* ERSMRF - Error summary flags bit set if line in summary mode. 
24 ;* UUT CSR - All bits cleared, except IND.ADR.REG field destroyed. 
2 3* 
oe 3* CALLING SEQUENCE: JSR PC ,RDPOR 
52 ;* ‘ 
4 3* COMMENTS: For byte accesses, only the specified byte is verified. 
;* 
5238 3* SUBORDINATE ROUTINES CALLED: ER1601,ROLDAP. 
5239 i-- SHRRREEREEAEEAEE SEES SEEDED ERASER EEEEEEED DEES OEE EE HEED EE ERED ERED EEEEEEEEEES 
5240 
5241 033636 RDPDR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
033636 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
oe 033642 012737 024736 005472 MOV ER1601,ERRBLK ;SE/ UP THE ADDRESS OF THE ERROR REPORT RTN. 
4 3? 
pore ; Determine whether register deta should be inverted from data pattern. 
24 fe 
5246 033650 005704 TST R4 sCHECK THE OPERAND TYPE INDICATOR. 
5247 033652 100001 BPL 2$ ;BIC WRITE PERFORMED? NO, USE STANDARD DATA. 
aoe 033654 005102 COM R2 sYES, INVERT THE DATA PATTERN. 
24 i+ 
344 ; Set up outer loop. 
- 
st 033656 005005 2s: CLR RS s;CLEAR LINE COUNTER TO SELECT LINE 0. 
3¢ 
5254 ; The outer loop follows. Each pass through this loop reads and compares data 
et s from all of the device registers for a particular line if the line is active. 
g- 








SEQ 0138 





—— 





5257 033660 
5258 033664 
5259 033670 
5260 033672 
033674 
5262 033702 
5263 033704 


5268 033710 
5269 033712 
5270 033716 
033722 
S272 033726 
033730 
5274 033732 
5275 033734 
5276 033736 
5277 033740 
5278 033742 
5279 033744 
5280 033750 
5281 033754 
5282 033756 
5283 033760 
5284 033764 
5285 

5286 033770 
033774 
033776 
5289 034000 
034004 


5292 034006 

034006 
5293 034010 
5294 034012 
034016 
5296 034022 
034026 


034030 
5302 034034 
034040 
034042 
5305 034046 


5307 034050 
034050 
034052 


5310 034054 





010237 
010577 


001452 
012703 


010204 
046302 
016300 
005766 
001002 
011001 
000416 
100410 
005200 
111001 
000301 
042701 
042702 
000405 
111001 
042701 
042702 


046301 
020102 
001404 
004737 
103401 


104460 
010402 
004737 
062703 
020327 
003730 


013702 
004737 
005205 
020527 
002704 


004736 
000207 


000000 


034054 
146410 
002534 
000004 


002320 
002300 
000010 


000377 
000377 


177400 
177400 
002320 


030236 


034642 
000002 
000016 


034054 
034642 


000010 


- RDPOR - 


002272 


4$; MOV R2,70$ sSAVE THE OUTER LOOP DATA PATTERN. 
MOV RS,@CSRA sSET CSR IND.ADR.REG FIELD TO THIS LINE. 
MOV RS,RO 
ASL RO 
BIT BITTBLCRO),ACTLNS 
BEQ 16$ sIS THE LINE ACTIVE? NO, SKIP THE LINE. 
MOV #LPRO,R3 sYES, INITIALIZE REGISTER OFFSET FOR LPR. 
3? 
; The inner loop follows. Each pass through this loop reads and compares 
F data from a device register. 
3° 
6$ MOV R2,R4 sSAVE THE INNER LOOP DATA PATTERN. 
BIC UNBTTBCR3),R2 sREMOVE UNUSED BITS FROM EXPECTED DATA. 
MOV DRADRTCR3),RO 
TST R3SLOT(SP) sCHECK THE ACCESS TYPE INDICATOR. 
BNE 8$ sBYTE ACCESS? YES, GO PERFORM BYTE READ. 
Da aaa sNO, PERFORM WORD READ OF DEVICE REGISTER. 
8$: BMI 10$ sLOW BYTE ACCESS? YES, GO DO LOW BYTE READ. 
INC RO sHIGH BYTE ACCESS. FORM HIGH BYTE ADDRESS. 
MOVB (RO),R1 sREAD THE HI BYTE OF THE DUT REGISTER. 
SWAB R1 sPUT HI BYTE BACK INTO THE HI BYTE. 
BIC $377,R1 sREMOVE THE UNUSED BYTE IN ACTUAL DATA. 
. _— sREMOVE THE UNUSED BYTE IN EXPECTED DATA. 
10$: MOVB (RO),R1 sREAD THE LOW BYTE OF THE DUT REGISTER. 
BIC #177400,R1 sREMOVE THE UNUSED BYTE. 
BIC #177400,R2 sFORM EXPECTED LOW BYTE FOR COMAPARISON. 
12$: BIC UNBTTBCR3),R1 sREMOVE UNUSED BITS FROM ACTUAL DATA. 
CMP R1,R2 sCOMPARE ACTUAL AND EXPECTED DATA. 
BEQ 14$ sACTUAL = EXPECTED? YES, SKIP ERROR. 
JSR PC,CNTERR sNO, COUNT THE ERROR, CHECK FOR ERROR SUMMARY. 
BCS 14$ ;USE ERROR SUMMARY? YES, SKIP ERROR. 
ou * he “BAD BITCS) IN DEVICE xxxxx REGISTER FOR LINE nn (D).” 
TRAP CSERROR 
14$; MOV R4,R2 sRESTORE THE INNER LOOP DATA PATTERN. 
JSR PC ,ROLDAP sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
ADD #2 ,R3 sSET REGISTER OFFSET TO THE NEXT REGISTER. 
CMP R3,#TXBFCO sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
BLE 6$ ;LOOP IF NOT ALL REG DONE FOR THIS LINE. 
3* 
; Back into the outer loop. Now set up for next Line. Loop if not done. 
3° 
16$: MOV 70$,R2 sSET UP TO ROTATE THE DATA PATTERN. 
JSR PC ,ROLDAP sROTATE THE DATA PATTERN. 
INC R5 ;COUNT THIS LINE 
CMP R5,@NUMLNS sCOMPARE LINE COUNT WITH NUMBER OF LINES. 
BLT 4$ ;LOOP IF SOME LINES NOT DONE. 
60$: PASS sRESTORE GPRS. 
JSR PC ,A(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC 
70$: -WORD O sSTORAGE FOR DATA PATTERN OUTSIDE INNER LOOP. 
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ay ~ > 








SEQ 0139 
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5312 


5332 034056 

034056 
5333 024062 
034064 
5335 034070 
034072 


5342 034074 
034100 
5344 034102 
5345 034106 
5346 034110 
034114 
5348 034116 
5349 034120 
5350 034122 
034124 
5352 034126 


5354 034130 
034130 
034134 
034136 





005474 
002302 


027256 
000021 
021617 


000004 


- READBX - 


-SBTTL GLOBAL SUBROUTINE 
5 ++ SHEREDEEEEEEED OEE 66 0006060660000008 064600000000 0000000000000060000000008 
- READ CHARACTERS FROM THE FIFO AND CHECKS FOR BMPS AND XONS- 

This subroutine is used in the FIHAVL.TST. 

It reads the specified number of characters from the fifo and checks 
for BMP codes and XON characters. 


;* 
3* INPUTS: 
7% 
3* OUTPUTS: 


3% 
3% 
;* 
;* 


3% 
3% 


3% 
s# CALLING SEQUENCE: 


3* 
3* COMMENTS: 


3* 
;# SUBORDINATE ROUTINES CALLED: CHKBMP. 
i-- SEEREERAEEEEEEESESEAREREEAEAEESSEAASEAEERAREEEEEEEEDEEEEEEEEEEEREEEEREEEEES 


READBX: : 


2s: 


SAVE 


Wednesday 08-May-85 10:16 Page 100 


- READBX - 


RO - Contains the number of chars to read from the fifo. 


Ri - Contains address of error message to be reported 
Clear if no error found. 
Carry used to indicate if fifo was found empty, carry clear. 


JSR 


JSR 
Ri 


RBUFA,R3 
(R3),R2 
8$ 


PC ,READ 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PRCGOS sCALL REGISTER SAVE SUBRT. 
;CLEAR GPR THAT HOLDS THE ADDRESS OF ERRMSG. 
sGET THE ADDRESS OF THE RECEIVER BUFFER REG. 
sREAD A CHARACTER FROM THE FIFO. 

sBRANCH IF FIFO IS EMPTY. 


i? 
; Check if the read character is a BMP code. 

; If it is a BMP code save it on the queue to be reported later, and 
; abort the test. 


4$: 
6$: 
8$: 
60$: 


PC ,CHKBMP 
6$ 
R2,@21 
4$ 
%€M5402,R1 
6$ 
RO 
2s 
60$ 
Ri 
MOV 
JSR 
PC 


sCHECK IF CHARACTER IS A BMP CODE. 
sBRANCH IF A BMP CODE WAS FOUND. 
sCHECK IF IT IS AN XON. 

sBRANCH IF NOT AN XON. 

sPASS THE MESSAGE TO BE REPORTED. 
:GO EXIT TEST. 

sDECREMENT THE READ COUNT. 


ee TO INDICATE SUCCESS. 

3;EXI 

sCLEAR CARRY BIT TO INDICATE FAILURE. 
s;RESTORE GPRS, 


R1,R1ISLOTC(SP) 
PC,@C(SP)+ 


sPUT R1 IN STACK SLOT. 
sRETURN TO PREGOS SUBRT. 


SEQ 0140 
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5383 034140 
034140 


5387 034144 
5388 034150 
5389 034154 
5390 034160 
5391 034162 
5392 034164 


5396 034164 
5397 034166 
5398 034172 
5399 034176 
5400 034200 
5401 034202 
5402 034204 
5403 034212 
5404 034214 
5405 034216 
5406 034220 
5407 034222 
5408 034230 
5409 034232 
5410 034234 


- 


004537 


012705 
012702 
032704 
001001 
005004 


005474 


000020 
167410 
000001 


036036 
005466 


000012 


000012 


036036 


- REGTST - 
-SBTTL GLOBAL SUBROUTINE - REGTST - 
5 t+ SHOEEEEEEEEEED OSES 066000000666 0600000000600000000000000000600000000000000008 
34 - Registers Test Subroutine - 
3* Subroutine to test the Device Under Test (DUT) registers. The used 
3* bits of the registers are either all cleared or all set and then the 
34 dete pattern is written and verified using either word or byte 
Hig accesses in read/write or read/modify/write mode. 
;* 
3 INPUTS: R3 - Byte indicator (- => low, + => high, 0 => both bytes). 
3* R4 - Access mode (-1 => set then BIC, 1 => clear then BIS, 
3% (-2 => set them MOV, +2 clear then MOV). 
;* ERRNBR - Set up with initiel error number. 
7* 
3# OUTPUTS: GPRSO - GPR save area 0 is destroyed. 
34 Device Under Test registers are written. 
34 Error messages may be printed at the operators console. 
3% 


000002 


177776 





s# CALLING SEQUENCE: JSR PC ,REGTST 


3* COMMENTS: This routine loop 16 times writing the same date pattern 

;* rotated left once each iteration. 

34 This routine can report errors INITIAL ERRNBR thru INITIAL +2. 
3% 

3# SUBORDINATE ROUTINES CALLED: RDPDR,ROLDAP ,SWAPO,WDPOR 

i-- acahetnthatnshnshchtnthanthtnteeneenhe Lett Ltt LTT ti Titi TTT TTT TTT TTT TTT TTT ttt 


REGTST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
3¢ 
; Set up the GPRs for the writting of the date pattern. 
MOV #16. ,R5 sSET UP LOOP COUNTER TO COUNT 16 ITERATIONS. 
MOV #167410,R2 sINITIALIZE THE DATA PATTERN. 
BIT @BITO,R4 sTEST FOR R/W ACCESS. 
BNE 2s sR/M/W ACCESS? YES, R4 IS ALL SET UP. 
- CLR R4 sNO, INDICATE R/W ACCESS. 
3* 
; Set up the GPRs for the clearing or setting of all the used bits. 
- 
MOV R4,RO sPASS OPERATION TYPE INDICATOR AROUND SWAPO. 
JSR PC ,SWAPO ;sGET ALTERNATE GPR SET IN R1 THRU RS. 
~ he sSAVE THE INITIAL ERROR NUMBER. 
V ’ 
NEG Ra sSET UP OP TYPE FOR CLEARING OR SETTING. 
CLR R2 sSET UP CLEAR WRITE PATTERN. 
CMP R4SLOT(SP),@2  ;TEST FOR CLEAR THEN MOV TEST SEQUENCE. 
BEQ as sCLEAR THEN MOV? YES, LEAVE WRITE PAT CLEAR. 
COM R2 sNO, SET ALL BITS OF WRITE PATTERN. 
4$: CLR R3 sINDICATE THAT WORD ACCESSES SHOULD BE USED. 
CLR RO sSET ALTERNATE BYTE EXPECTED DATA PAT TO CLEAR. 
CMP R4SLOT(SP),@-2 ;TEST FOR SET THEN MOV TEST SEQUENCE. 
BNE 6$ sSET THEN MOV? YES, LEAVE ALT BYTE PAT CLEAR. 
COM RO sNO, SET ALT BYTE EXPECTED DATA PAT TO ALL 1'S. 
6$: JSR PC ,SWAPO sRESTORE SWAPPED GPR VALUES TO R1 THRU RS. 


3¢ 
; Stert of data pattern loop. 





SEQ 0141 
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- 


034264 
034270 
034274 
034300 
034302 


034304 
034306 
034310 
034312 
034316 
034322 
034324 


034326 
034332 
034334 


034336 
034344 
034344 
034346 


010102 


004737 
005305 
003341 


013737 


004736 
000207 


005466 
033636 


034642 


002634 


- REGTST - 


10$: 


005466 60%: 


3? 
; Set or clear all the used bits of the device registers for ell lines. 
; Verify thet all the bits were set or cleared correctly. 


3° 


i Write date patterns, all lower byte used bits, ell registers, all lines. 


PC, SWAPO 
PC ,WOPOR 
R1,ERRNBR 
PC ,ROPOR 
PC ,SWAPO 


sGET ALTERNATE GPRS FOR SETTING INTIAL STATES. 


sGO CLEAR ALL USED REGISTER BITS, ALL LINES. 
sSET UP ERROR NUMBER TO INITIAL ERRNBR. 
sVERIFY ALL USED REGISTER BITS, ALL LINES. 
sRESTORE MAIN GPRS CONTENTS. 


; Verify that the date pattern wes written correctly. 


sWRITE DATA PATTERN TO DEVICE REGISTERS. 
sSET ERROR NUMBER TO INITIAL +1. 

sVERIFY DATA PATTERN IN ALTERRED BYTE(S). 
sCHECK THE BYTE INDICATOR. 

sWORD ACCESS? YES, SKIP SECOND BYTE CHECK. 


3? 
s Check thet the elternate (unmodified) byte is clear or set as expected. 


sSAVE THE DATA PATTERN. 

sGET THE ALTERNATE BYTE EXPECTED DATA. 
sINDICATE THAT OTHER BYTE IS TO BE CHECKED. 
sSET ERROR NUMBER TO INITIAL+2. 


sVERIFY DATA PATS IN OTHER BYTES OF REGISTERS. 


sRESTORE BYTE INDICATOR. 
sRESTORE DATA PATTERN. 


the next dete pattern and loop if not done. 


JSR PC ,WOPDR 
INC ERRNBR 
JSR PC ,.RDOPOR 
TST R3 
BEQ 10$ 

7= 
MOV R2,R1 
MOV RO,R2 
NEG R3 
INC ERRNBR 
JSR PC ,ROPOR 
NEG R3 
MOV R1,R2 

3? 

; Pepere 

| id 
JSR PC ,ROLDAP 
DEC RS 
BGT 8$ 
MOV GPRSOB ,ERRNBR 
PASS 

JSR 

RTS PC 





sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
sCOUNT THIS ITERATION OF THE LOOP. 

sALL PATTERNS DONE? NO, LOOP. 

sYES, RESTORE ERROR NUMBER AND EXIT. 

sGET THE ERROR NUMBR FROM GPR SWAP STORAGE. 
sRESTORE GPRS. 


PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 


SEQ 0142 
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034350 
034350 
034354 
034362 
034366 
034370 
034372 





005474 
025330 
005466 








177760 






034376 022355 


000001 


005466 
022377 
000300 





032702 








035624 
000201 













5499 034452 000400 
5500 
5501 
5502 
5503 034454 042702 177400 
3504 004737 037074 
5505 034464 
034464 104460 
5506 034466 004737 037130 
5507 
5508 
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005472 


-SBTTL GLOBAL SUBROUTINE - REPCOD - 
5 ¢¢ S0060060660006 0606000060 600600000000000000000000000000000000000000000000008 


34 - Routine to Report Error Code From DUT - 

34 This routine reports en error code which hes been reed from the DUT 
34 FIFO. The code is checked to determine whether it is e Selftest code 
34 en Modem Status Change code or a BMP code. This routine essunes thet 
3% the code indicates en error. If ea BMP code is found it is not reported 
3% immediately, but is seved on the BMP code queue to be reported leter. 
3% 

3@ INPUTS: R2 - Conteins the error code complete with flegs and line @. 
3% ERRTBL - ERRTYP,ERRNBR,end ERRMSG set up correctly. 

3% 

3# OUTPUTS: ERRBLK - Value may be destroyed. 

1% BMPCQP - Maybe updeted if e code is edded to the queue. 

3% 

s* CALLING SEQUENCE: JSR PC ,REPCOD 

3% 

3@ COMMENTS: ERRNBR is restored to its entering value by this routine. 

34 This routine reports errors with numbers ERRNBR thru ERRNBR+1. 


3% 

s# SUBORDINATE ROUTINES CALLED: ER9001,SAVBMP. 

t-- 6600666 66066606006000 6006060006 0006000600000660060000000000000000000000008 
REPCOD:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 


JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 

MOV @ER9001,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
MOV ERRNBR ,R3 sPRESERVE THE ERROR NUMBER. 
MOV R2,R4 sEXTRACT THE LINE NUMBER FIELD 
SWAB R4 s FROM THE ERROR CODE WHICH WAS 
BIC #177760,R4 s PASSED INTO THIS ROUTINE. 

3¢ 

; Determine the type of code which is to be reported. 

ge 
MOV #EM9003,R1 sSELECT MODEM STATUS CODE MESSAGE. 
BIT #BITO,R2 sTEST THE MODEM STATUS INDICATION BIT. 
BEQ as sGOTO REPORT ERROR IF MODEM STATUS CODE. 
INC ERRNBR sSELECT THE SELFTEST CODE ERROR NUMBER. 
MOV @EM9004 ,R1 sSELECT SELFTEST CODE MESSAGE. 
MOV #300 ,RO sCHECK IF SELF-TEST OR BMP CODE. 
BIC R2,RO sTRY TO CLEAR BMP BITS. 
BNE 2s sGO CHECK FOR SELFTEST CODE IF NOT BMP. 


sSAVE THE BMP CODE ON THE QUEUE. 
BR 60% sEXIT THIS ROUTINE. 
2%: CMPB oes ae sCHECK FOR SELF TEST NULL CODE. 






BR ae 
3° 
s Report “UNEXPECTED xxxxx CODE FOUND IN RECEIVE CHAR FIFO.” 
rad 
4$; BIC 





#177400,R2 sREMOVE UPPER BYTE OF CODE TO BE REPORTED. 
JSR PC , TXROFF sTURN OFF TX AND RX DURING ERROR REPORTING. 
ERROR 3 >>>>> ERROR <<ccc, 
TRAP CeERROR 
JSR PC, TXRON sTURN TX AND RX BACK ON. 





3° 
s Restore the initiel error nuaber. 
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SEQ 0144 
GLOBAL SUBROUTINE - REPCOD - 

5509 8° 

_ 034472 010337 005466 63: MOV R3,ERRNBR 

il 
S512 034476 6038: PASS sRESTORE GPRS. 
034476 004736 JSR PC ,8(SP)- sRETURN TO PREGOS SUBRT. 
5513 034500 000207 RTS PC 





r-— 
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5541 034502 

034502 
5542 034506 
5543 034512 


5547 034514 


5552 034522 
034522 


5554 034524 
034524 
5555 034526 


004537 
005737 
001404 


012737 


104460 


004736 
000207 





- REPSMR - 
-SBTTL GLOBAL SUBROUTINE - REPSMR - 
FOF MAAESEAESAASERESEAEESEAAEEEEEEEEEAEERDREEOEEEDEEEEDEEEEODEEEDEEEEEEEEEEEES 
;¢ - Report Error Summary Routine - 
34 This subroutine reports an error summary for those lines which have 
3¢ exceeded the number of individual errors to report for a single line 
34 in a single test. This parameter can be specified by the operator if 
34 he/she answers the Software Parameter Questions. 
3* 
3;@ INPUTS: ERCNTB - Label at base of line error counters table. 
34 ERRMSG - Address of primary error message. 
34 ERRNBR - Error number of errors in this routine. 
34 ERSMRF - “Report error summary for line” flags. 
3* 
3# OUTPUTS: ERRBLK - Address of error reporting routine (Destroyed). 
34 Summary messages may be printed at the operator console. 
3*# 
3* CALLING SEQUENCE: Jso PC ,REPSMR 
34 
3* COMMENTS: If no lines have exceeded the maximum number of individual 
:* errors to report, no messages are printed by this routine. 
3% Error summaries in this routine are reported as errors. 
34 The contents of ERRBLK ere destroyed. 


005474 
002650 


025750 005472 


3% 
3 SUBORDINATE ROUTINES CALLED: 
i-- SERREEEEEAESEEAEEAESEAESSEAEESSAEAEAARARESAAEASEAEEEEDEREEESERERESEELEEEEED 


REPSMR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
TST ERSMRF sCHECK THE “PRINT LINE ERROR SUMMARY” FLAGS. 
BEQ 60$ sEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 


; We have some error summaries to report. 
F 


MOV ER9004,ERRBLK ;SELECT ERROR REPORTING ROUTINE. 


" Report 
; “ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: ” 
ERROR 
TRAP CSERROR 
60$: PASS sRESTORE GPRS. 
JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
RTS PC 





















SEQ 0145 
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5557 
5558 
5559 
5560 
5561 
5562 
5563 


034530 
034530 
034534 


034540 
034544 
034546 
034550 
034552 
034556 
034562 


034564 
034570 


034574 
034576 
034602 
034606 


004537 
012702 


013704 
030214 
001406 
005003 
012701 
004737 
103012 


010277 
004737 


005003 
012701 
004737 
103410 


005474 
000040 


002300 


004704 
031726 


145510 
035740 


004704 
031726 











-SBTTL GLOBAL SUBROUTINE - RESETT - 
FERRARERAEEEEESEEAEAEEEEAAEEEEEEEEERARAREREEESEEEEEEEEREEEEEOREEEEEEEEEEEEEEEEE 
34 - Reset Device Under Test - 

34 This subroutine is used to reset the DUT to a known state. 

34 If reset does not succesfully complete, ie. time-out occurs, then 

3* an abort test error message is reported. 

3% 

3@ INPUTS: CSRA - Contains the address of the CSR 

34 TXBFCA - Contains address of DUT DMA Buffer Count register. 
34 ERRTBL- ERRTYP,ERNBR,and ERRMSG set up correctly. 

3% 

3@ OUTPUTS: The DUT performs its reset function into a known state. 

34 CARRY - Clear indicates the test is to be aborted. 

34 ERRBLK - value may be destroyed. 

34 IESTAT - TX and RX interrupt flegs are cleared. 

34 TX and RX interrupt enable bits in the DUT’s CSR are cleared. 
3% 

3@ CALLING SEQUENCE: JSR PC ,RESETT 

3% 

;* COMMENTS: This subroutine can report errors with numbers initial ERRNBR 
34 This routine does not destroy the value of ERRNBR. 


3% 
s* SUBORDINATE ROUTINES CALLED: DELAY,MSLGET. 
FRRRAREEEEEEEEEEEAESEESEEEEREREAEAPAREEEESAAERESEERREAARARASEEEASEEREEAEREREEES 


RESETT:: SAVE :S®/E CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV *BITOS,R2 sSET BIT MASK OF MASTER RESET BIT. 


;* 

; Test the state of the master reset bit in the CSR. 

; If MR is set then wait for self-test to complete. 

3 If time-out occurs, report the error and pass-out abort test indicator. 


MOV CSRA,R4 sGET THE ADDRESS OF THE DUT‘S CSR. 

BIT R2,(R4) sCHECK STATE OF MASTER RESET BIT. 

BEQ 2$ sDON‘T DELAY IF MR IS ALREADY CLEAR. 

CLR R3 sSET UP DESIRED STATE OF MASTER RESET BIT. 
MOV #2500. ,R1 sPASS TIME-OUT VALUE OF 2.5 SECONDS. 

JSR PC ,MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
BCC 4s sGO REPORT ERROR IF TIMEOUT OCCURRED. 


$e 
; Set Master Reset bit in CSR. Clear TX and RX enable bits, etc. 
; Skip the selftest. 

s Time-out of 2.5 secs, just in case the self-test executes. 


2s: MOV R2,8CSRA sSET MASTER RESET BIT, DISABLE TX AND RX INTS. 
JSR PC,SKPSTS sTRY TO SKIP THE SELFTEST. 


Set Self-test time-out of 2.5 seconds, and wait for M.R to clear. 
If Time-out occurs, then report the fatal error and pass-out the abort 
test indicator. 


CLR R3 _ sSET UP DESIRED STATE OF MASTER RESET BIT. 
MOV #2500. ,R1 sPASS TIME-OUT VALUE OF 2.5 SECONDS. 

JSR PC ,MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
BCS 6$ sSKIP ERROR REPORT IF MR CLEARED IN TIME. 






SEQ 0146 








rl 
CVOHEBO OHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 104-1 


GLOBAL SUBROUTINE - RESETT - 

















SEQ 0147 


5613 3+ 
5614 ; Set up error message to report "fatal error found during reset,test aborted”. 
meoe ; Indicate test is to be aborted by clearing the carry bit. 
616 3° 
5617 034610 012701 015226 4$: MOV 9€M1601,R1 sPASS ERROR MESSAGE TO REPORT. 
5618 034614 012737 025034 005472 MOV #ER1603,ERRBLK ;PASS ADDRESS OF ERROR HANDLING ROUTINE. 
5619 sREPORT ERROR “TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR” 
5620 ; “TEST ABORTED” 
5621 034622 ERROR : >>>>> ERROR <<<c< 
034622 104460 TRAP CSERROR 
5622 034624 000241 cc sINDICATE TEST IS TO BE ABORTED. 
ory 034626 000403 BR 60$ sEXIT THIS SUBROUTINE, ABORT TEST INDICATOR. 
3¢ 
5625 ; Clear TX and RX Interrupt enable status flags in IESTAT. 
ae ; Exit with continue test indicator set (ie,carry set). 
62 :- 
5628 034630 005037 002374 6$: CLR IESTAT sCLEAR TX AND RX INTERRUPT STATUS FLAGS. 
pee 034634 000261 SEC sINDICATE SUCCESS, CONTINUE TEST. 
5631 034636 60$: PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
034636 004736 JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
5632 sCARRY BIT: IF CLEAR, INDICATES ABORT TEST. 
+244 024640 000207 RT: PC 
634 
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5655 034642 

034642 
S656 034646 
5657 024650 
5658 034652 
5659 034654 
5660 034656 
5661 034660 
5662 034662 
5663 034664 

034664 

034670 


5665 034672 


r-— 


004537 
010202 
005702 
100402 
000241 
000401 
000261 
006102 


010266 
004736 


000207 


005474 


000006 





- ROLDAP - 


-SBTTL GLOBAL SUBROUTINE - ROLDAP - 
FEREAAEAEERESEEREEAEEEEAEAEEEEEEEEEREAEDEAEAEEEE REESE ED EEEEEEED ERED EEEEEEEEEEESS 
3* - ROtate Left DAta Pattern 

3% This routine rotates the passed input date pattern left,without going 
:* through the carry.The carry is initially set or cleared depending 

34 upon the state of the MSB of the data pattern, before a ROL instruction 
34 is executed. 

a 


m4 INPUTS: R2 - Contains the date pattern to be rotated 
mt OUTPUTS: R2 - Contains the rotated date pattern 

ie CALLING SEQUENCE: JSR PC ,ROLDAP 

‘2 COMMENTS: 


3% 
3* SUBORDINATE ROUTINES CALLED: NONE 
FERRARA REEAERAEERAAEAAEEE SEERA AEAREAAEEAEESARAAREAEAERAAARESEEEREEREREEERES 


ROLDAP : : SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV R2,R2 ;SET PROCESSOR STATUS CODES 
TST R2 ;CHECK MSB 
BMI 2s ;BRANCH IF SET 
= . ;CLEAR CARRY BIT IF MSB CLEAR 
4 ; 
2s: SEC ;SET CARRY IF MSB SET 
4$: ROL R2 sROTATE DATA PATTERN LEFT 
60$: PASS R2 sRESTORE 6PRS,EXCEPT 
MOV R2,R2SLOTASP ) ;PUT R2 IN STACK SLOT. 
JSR PC,@C(SP)+ ;RETURN TO PREGOS SUBRT. 


sR2 - CONTAINS THE ROTATED DATA PATTERN 
RTS PC 












SEQ 0148 
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5691 034674 

034674 
5692 034700 
5693 034702 
5694 034706 


5698 034710 
5699 034716 
5700 034722 


5706 034726 
034726 


5709 034730 
034730 
5710 034732 


-— 


004537 
010502 
043702 
001410 


012737 
012701 
012704 


104460 


004736 
000207 


005474 
002654 


026052 
023043 
003712 


- RRXNON - 
-SBTTL GLOBAL SUBROUTINE - RRXNON - 
BB Ml acathetaeteeteecahehneetee hie tLLL TLL TLL TTL T TT TTT TTT TTT TTT TTT rte tT 
74 - Report Reception Not Completed Routine - 
34 This subroutine checks for lines which did not receive the complete 
i* data pattern. If any are found, they are reported. 
7* 
;* INPUTS: RS - Local active lines bit map. 
3% DPLENB - Base of table of data pattern lengths. 
34 ERRMSG - Address of primary error message for this routine. 
34 ERRNBR - Error number of error reported in this routine. 
;* RXCNTB - Label at base of the RX character counters table. 
;* RXDONF - Reception done flags. 
3* 
3* OUTPUTS: ERRBLK - Address of the error reporting routine (Destroyed). 
:* Messages may be printed at the operator console. 
3* 
3# CALLING SEQUENCE: JSR PC ,,RRXNON 
3;* 
:* COMMENTS: If no lines failed to complete their reception, no messages 
3% are printed. 


005472 





3;* 
s* SUBORDINATE ROUTINES CALLED: ER9005. 
i-- SEREEEEEERERSESAEAEAESEREEAEEREEAEEEDAEE DEES EEEEE EEE EE EE EE ES EKEEEEEEEEEES 


RRXNON:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


MOV RS ,R2 sGET COPY OF THE LOCAL ACTIVE LINES BIT MAP. 
BIC RXDONF ,R2 sGET MAP OF ACTIVE LINES WITH RX DONE FLAG CLR. 
BEQ 60$ sEXIT IF NO ACTIVE LINES HAVE RX DONE FLAG CLR. 


; We have some “RX not completed” errors to report. 


: MOV @ER900S,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
MOV #€M9016,R1 sINDICATE THAT WE ARE DEALING WITH RECEPTION. 
MOV ORXCNTB,R4 sPASS BASE OF RX CHAR COUNTERS TABLE TO ER900S. 


3¢ 
; Report “SINGLE CHARACTER MODE TEST ERROR:” 
; “DATA PATTERN NOT COMPLETELY RECEIVED ON ALL LINES: ” 


ERROR 
TRAP CSERROR 
60$: PASS sRESTORE GPRS. 
= - JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
Ss 





SEQ 0149 
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S712 
5713 
$714 
5715 
$716 
$717 
5718 
$719 
$720 
$721 
$722 
5723 
5724 
$725 
$726 
$727 
5728 
5729 
5730 
$731 
$732 
5733 
$734 
5735 
5736 
$737 
5738 
$739 
5740 
5741 


5742 
5743 
$744 
5745 
5746 
5747 
5748 
5749 
5750 
$751 
5752 
5753 
5754 
$755 
5756 
$757 
5758 
5759 
5760 


5761 
5762 
5763 
5764 
5765 
5766 


034734 
034734 


034740 
034742 
034746 
034752 


034754 
034760 
034764 


034772 
034772 


034774 
034776 


004537 


005003 
013705 
017702 
100412 


010537 
012701 
012737 


104460 


000261 
000545 


- RSTRPT - 


005474 


005466 
145330 


005466 
023163 
026300 005472 





-SBTTL GLOBAL SUBROUTINE - RSTRPT - 

b¢¢ SHREREEEEEEEED ODES 660640000404 44 0000 OOOO hh Ok kkk hh 88h eee ees 
34 - Report any Reset Errors Routine - 

3% This routine determines if any error codes are among the diagnostic 
i* codes reported placed in the DUT received character FIFO by the 

34 Self-test. If any non BMP error codes are found, or if other errors 
3* are encountered, appropriate errors are reported. Any BMP codes that 
ia ere found, are placed on the BMP code queue to be reported later. 

3* This routine also purges the DUT FIFO looking for any characters 

i* or modem status codes. If any are found, errors are reported. 

3* INPUTS: ERRMSG - Address of the primary error message. 

;* ERRNBR - Error number of first error reported by this rouitne. 
3* NUMLNS - Equated to the number of line on the DUT. 

;* RBUFA - Contains address of the DUT receiver FIFO. 

3* 

;* OUTPUTS: CARRY - Success flag (set if FIFO cleared successfully). 

34 ERRBLK - Address of the error report routine (Destroyed). 

7% Error messages can be printed at the operators console. 

3% 

;* CALLING SEQUENCE: JSR PC ,RSTRPT 

;* 

;* COMMENTS: This subroutine can report errors with numbers Initial ERRNBR 
3% thru Initial ERRNBR+4, 

7% This routine does not destroy the value of ERRNBR. 

3* 


s* SUBORDINATE ROUTINES CALLED: EROS03,ER9007,ER9008,SAVBMP. 
i -- SRREEREREREEEEEEEE EE EEED EEE ES EEE EEEEEEOEEE OE OE EE EE ODE OE EOE EEE EE EE EE EES 


RSTRPT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
;* 


; Read correct number (number of line on DUT) of chars from the FIFO. 
; Verify that each char is a selftest success code. 


CLR R3 sCLEAR THE CODE COUNTER. 
MOV ERRNBR ,RS sSAVE ERRNBR FOR RESTORATION LATER. 
2s: MOV @RBUFA ,R2 sREAD A CHAR FROM THE DUT FIFO. 

BMI 4$ sSKIP ERROR IF DATA.VALID SET FOR CHAR. 

i+ 

i We expect a selftest code, but this FIFO slot is empty. 

‘ MOV RS,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
MOV #E€M9018,R1 sPASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 


MOV ER9007,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 


3* 
; Report error with number Initial ERRNRB. 
; "NO SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE nn AFTER RESET.” 


: ERROR ; >>>>> ERROR <<<<<, 
TRAP CSERROR 


3? 
s Inidicate “success” (because FIFO is purged), and exit this routine. 
— 
SEC sSET SUCCESS FLAG. 
BR 60$ sEXIT ROUTINE. 


3¢ 





SEQ 0150 
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SEQ 0151 
GLOBAL SUBROUTINE - RSTRPT - 
Lag ; Determine if this is not a selftest code. 
68 3° 
5769 035000 012700 070001 4$: MOV #70001 ,RO GENERATE BIT MAP OF ANY CLEAR ERROR BITS OR 
5770 035004 040200 BIC R2,R0 ; BIT O WHICH ARE CLEAR. 
avr 035006 001033 BNE 8$ :GO TO REPORT ERROR IF THIS IS NOT A TEST CODE. 
3+ 
5773 ; We have a test code (either BMP or selftest code). 
Lh ; Determine what type of code we have. 
e= 
5776 035010 032702 000200 BIT *BIT7,R2 sTEST ROM VERSION CODE INDICATOR BIT. 
5777 035014 001443 BEQ 10$ SKIP ERRORS IF SELFTEST ROM VERSION CODE. 
5778 035016 120227 000203 CMPB) = R2, #203 ;CHECK IF SKIP SELF TEST CODE. 
5779 035022 001440 BEQ 10$ sSKIP ERROR REPORT IF SKIP SELF TEST CODE FOUND 
5780 035024 120227 000201 CMPB = R2, #201 sCHECK IF NULL CODE PRESENT. 
5781 035030 001435 BEQ 10$ sSKIP ERROR REPORT IF SELF TEST NULL CODE. 
$782 035032 012700 000300 MOV #300 ,RO sTEST CODE TYPE BITS FUR BOTH CODE 
5783 035036 040200 BIC R2,RO0 ; TYPE BITS SET CINDICATING BMP CODE). 
5784 035040 001003 BNE 6$ ;sIF IT IS NOT A BMP CODE GO REPORT ERROR. 
5785 035042 004737 035624 JSR PC ,SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
dh 035046 000426 BR 10$ :GO GET THE NEXT CHARACTER FROM THE FIFO. 
3* 
De ; We have a selftest error code. 
89 3- 
5790 035050 010537 005466 6$: MOV RS ,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
5791 035054 005237 005466 INC ERRNBR sCALCULATE INITIAL ERROR NUMBER PLUS 1. 
5792 035060 012701 023210 MOV #EM9020,R1 sPASS ERROR MESSAGE INFO TO ER9008 ROUTINE. 
dae, 035064 012737 026356 005472 MOV ER9008,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3? 
5795 ; Report error with number Initial ERRNRB + 1. 
_ 3 “UNEXPECTED SELFTEST ERROR CODE FOR LINE nn IN FIFO AFTER RESET: ” 
79 a= 
5798 035072 ERROR ; >>>>> ERROR <<<cc<, 
035072 104460 TRAP CSERROR 
deed 035074 000413 BR 10$ ;GO TO END OF LOOP. 
80 3+ 
pecs ; We have a non-selftest code (either BMP code or data char). 
802 ' 
5803 035076 010537 005466 8$: MOV R5,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
5804 035102 062737 000002 005466 ADD #2,ERRNBR sCALCULATE INITIAL ERROR NUMBER PLUS 2. 
5805 035110 012701 023173 MOV #EM9019,R1 sPASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 
ee 035114 012737 026300 005472 MOV ®ER9007,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
80 3¢ 
5808 ; Report error with number Initial ERRNRB + 2. 
5809 3 “NON-SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE nn AFTER RESET. “ 
5810 s- 
5811 035122 ERROR ; >>>>> ERROR <<<<<, 
035122 104460 TRAP CSERROR 
5812 i+ 
a4 ; End of loop, loop if not all chars have been read from the FIFO. 
14 
5815 035124 005203 10$: INC R3 sSET CODE COUNTER FOR NEXT ITERATION OF LOOP. 
5816 035126 020327 000010 CMP R3,@NUMLNS ;TEST FOR ALL CODES READ. 
ae 035132 002705 BLT 2$ ;LOOP IF NOT CHARS READ FROM FIFO. 
8 3+ 
pore ; Purge the FIFO until DATA.VALID is clear or until too many chars are read. 
§° 
5821 035134 012704 000022 MOV #18. ,R4 sINITIALIZE THE CHARACTER COUNTER. 








— 
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SEQ 0152 


5822 035140 010537 005466 MOV RS,ERRNBR sGET INITIAL VALUE OF THE ERROR NUMBER. 
5823 035144 062737 000003 005466 ADD #3 ,ERRNBR sCALCULATE ERROR NUMBER OF NEXT ERROR. 
5824 035152 012737 026356 005472 MOV @ER9008,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
5825 035160 017702 145116 12$: MOV ORBUFA,R2 sREAD A CHARACTER FROM THE DUT FIFO. 
5826 035164 000261 SEC sINDICATE SUCCESS IN CASE DATA.VALID IS CLEAR. 
ao. 035166 100051 BPL 60$ sEXIT ROUTINE WITH SUCCESS IF DATA.VALID CLEAR. 
7* 
5829 ; We have a character. 
cose ; Determine if character is a date character. 
3° 
5832 035176 012700 070000 MOV #70000 ,RO ;TEST BITS 12 THRU 14 OF THE 
5833 035174 040200 BIC R2,R0 + CODE READ FROM THE DUT FIFO. 
oe 035176 001403 BEQ 14$ sSKIP THIS ERROR IF CODE IS NOT A DATA CHAR. 
3* 
o024 ; We have an unexpected data character: set up and go to report error. 
5838 035200 012701 023234 : MOV #EM9022,R1 s;SELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
aH 035204 000423 BR 22$ ;GO TO REPORT THIS ERROR. 
3? 
5841 ; We have an unexpected code. 
fost ; Determine if the code is a modem status code. 
3- 
5844 025206 032702 000001 14$: BIT #BITO,R2 ;TEST MODEM STATUS INDICATOR BIT OF CODE. 
or 035212 001003 BNE 16$ ;SKIP THIS ERROR IF NOT MODEM STATUS CODE. 
6 i¢+ 
net ; We have a modem status code: set up and go to report error. 
84 3° 
5849 035214 012701 023253 MOV #EM9023,R1 sSELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
oe 035220 000415 BR 22$ ;GO TO REPORT THIS ERROR. 
1 i+ 
5852 ; We have an onboard test code. 
sey ; Determine if this code is a BMP code. 
5854 i 
5855 035222 032702 000200 16$: BIT *BIT7,R2 sTEST THE ROM VERSION BIT OF THE CODE. 
5856 035226 001404 BEQ 18$ sGOTO SET UP FOR SELFTEST CODE IF ROM VERSION. 
5857 035230 012700 000300 MOV #300 ,RO 
5858 035234 040200 BIC R2,RO0 sTEST THE ERROR TYPE BITS OF THE CODE. 
aos 035236 001403 BEQ 20$ ;SKIP THIS ERROR IF BMP CODE. 
86 3+ 
tet ; We have a selftest code: set up and go to report error. 
86 s- 
5863 035240 012701 023275 18$: MOV $EM9024,R1 ;SELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
feos 035244 000403 BR 22$ ;GO TO REPORT THIS ERROR. 
86 3+ 
pose ; We have a BMP code: save it on the queue. 
86 8° 
5868 035246 004737 035624 20$: JSR PC ,SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
5869 035252 000401 BR 243 3 
5870 ;¢ 
5871 ; Report the error with error number of Initial ERRNBR + 3. 
sore ; "UNEXPECTED xxx xxxx FOR LINE nn IN FIFO AFTER RESET: ” 
g= 
5874 035254 223: ERROR ; >>>>> ERROR <<<<<, 
035254 104460 TRAP CSERROR 
5875 i+ 
5876 ; End of loop. 
5877 ; Count the character we just received, and check for too many received. 


r— 
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— 


5878 
5879 035256 
5880 035260 


5886 035262 
5887 035266 
5888 035272 
5889 035300 


5891 035306 
035306 
5892 035310 


5894 035312 
035312 
5895 035314 


005304 
001337 


012701 
010537 
062737 
012737 


104460 
000241 


004736 
000207 


023052 
005466 
000004 
024644 





- RSTRPT - 


24$:- DEC R4 sCOUNT THIS CHARACTER. 
BNE 12$ sLOOP IF NOT TOO MANY CHARACTERS PURGED. 


3;* 

i We read too many valid characters while trying to purge the FIFO. 

; Report error and exit without success. 

; “FIFO WILL NOT PURGE (DATA.VALID STUCK SET), REMAINDER OF TEST SKIPPED. ” 
3° 


MOV 9€M9017,R1 sSELECT PROPER ERROR MESSAGE. 

MOV RS ,ERRNBR sGET INITIAL ERROR NUMBER. 
005466 ADD 4 ,ERRNBR sCALCULATE INITIAL ERRNBR + 4. 
005472 MOV @EROSO3,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 


;PRINT ERROR REPORT. 
ERROR : >>>>> ERROR <<cc<, 
TRAP CSERROR 


cLC sCLEAR THE SUCCESS FLAG. 
60$: PASS sRESTORE GPRS, 
JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC ; CARRY - SUCCESS FLAG (SET IF FIFO IS PURGED). 












SEQ 0153 
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2 


5937 
5938 
5939 
5940 


5941 


035316 
035316 
035322 
035324 
035330 


035332 
035340 
035344 


035350 
035350 


035352 
035352 
035354 


004537 
010502 
043702 
001410 


012737 
012701 
012704 


104460 


004736 
000207 


005474 
002652 


026052 
023027 
003652 


- RTXNON - 
-SBTTL GLOBAL SUBROUTINE - RTXNON - 


005472 


3¢* ££464664046466646666646664 
3* - Report 
;* This subroutine 


;* data pattern. I 
;* 

3# INPUTS: RS - Loc 
3% DPLENB - 


:* ERRMSG - 
34 ERRNBR - 
:* TXCNTB - 
34 TXDONF - 
;* 

3* OUTPUTS: ERRBLK - 
3* Messages 
;* 

3* CALLING SEQUENCE: 

3* 

3* COMMENTS: If no li 
3* ere prin 


3* 
s# SUBORDINATE ROUTINES 
j-- $66606460460664666466446464 


RTXNON:: SAVE 
MOV R5,R2 
BIC TXDONF ,R 
BEQ 60$ 


3? 
; We have some "TX not c 


MOV —-@ER900S. 
MOV —«-@EM9015. 
MOV @TXCNTB. 
3¢ 
; Report “SINGLE CHA 
; "DATA PATTERN N 
; eee 
~ ERROR 
60$: PASS 
RTS ~—s PC 





SOO6O6 6464 $060 0000000004 04006 000000000008 000000000000088 
Transmission Not Completed Routine - 

checks for lines which did not transmit the complete 

f any ere found, they are reported. 


el active lines bit map. 

Label at base of data pattern length teble. 
Address of primary error message for this routine. 
Error number of error reported in this routine. 
Label at base of the TX character counters table. 
Transmission done flags. 


Address of the error reporting routine (Destroyed). 
may be printed at the operator console. 


JSR PC ,RTXNON 


nes failed to complete their transmission, no messages 
ted. 


CALLED: ER9005. 
666600660066000060006600060000000008 600000000000 0000008 


sSAVE CONTENTS OF GPRS RO THRU RS. 

JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sGET COPY OF THE LOCAL ACTIVE LINES BIT MAP. 

2 sGET MAP OF ACTIVE LINES WITH TX DONE FLAG CLR. 
sEXIT IF NO ACTIVE LINES HAVE TX DONE FLAG CLR. 


ompleted” errors to report. 


ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
R1 sINDICATE WE ARE DEALING WITH TRANSMISSION. 
R4 sPASS BASE OF TX CHAR COUNTERS TO TABLE ERO80S. 


RACTER MODE TEST ERROR:” 
OT COMPLETELY TRANSMITTED ON ALL LINES:” 


; >>>>> ERROR <<ccc, 
TRAP CSERROR 


sRESTORE GPRS. 


JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 





SEQ 0154 








CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 169 





GLOBAL SUBROUTINE 


an 


001401 


005474 
000001 
002310 


000010 
002374 


144666 
000004 


000004 


000014 


- RXDSBL - 


-SBTTL GLOBAL SUBROUTINE 


b+ S06060000006 060606 6000060060000000060000000600000000000000000000000600000008 
- Disable Receivers - 


- RXDSBL - 


34 This subroutine is used to disable reception on selected lines by, 
3 clearing the associated RX_ENABLE bit on the DUT. 

3* 

3 INPUTS 


;* 
3* COMMENTS: 
3* 


RS - Bit's set correspond to lines on which to clear RX_ENABLE. 
CSRA - Contains the eddress of the DUT CSR. 

IESTAT - Contains the state of TXIE and RXIE bits in the CSR. 
NUMLNS - Equated to be the maximum number of lines eveileble. 
LNCTRA - Contains the eddress of the LNCTRL register. 


RS - Bit's set indicate initial states of all RX_ENBLE bits. 
LNCTRA - The state of the RX_ENBLE bit may be altered. 
The contents of the IND_ADD_REG field in the CSR ere destroyed. 


s# CALLING SEQUENCE: 


JSR 


PC ,RXDSBL 


s# SUBORDINATE ROUTINES CALLED: NONE. 
b> - 00006066 60606066660666 66 0606 06400000000600000600000000000000000000000000008 


RXDSBL:: SAVE 


RS ,RO 
#BITO,R1 
LNCTRA,R 
@NUMLNS, 
IESTAT,R 
RS 


JSR 


2 
R3 
4 


sSAVE CONTENTS OF GPRS RO THRU RS. 

S .PREGOS sCALL REGISTER SAVE SUBRT. 
sCOPY BIT MAP OF LINES TO DISABLE RECEPTION. 
sINITIALIZE THE SELECTED LINE BIT MASK. 

sGET THE ADDRESS OF THE LNCTRL REGISTER. 
sGET MAXIMUM LINE NUMBER PLUS ONE. 

sGET THE STATES OF THE INT ENABLE BITS. 

sLOG POSSIBLE RX DISABLED ON ALL LINES. 


7¢ 
+ Select every line in turn, and log the state of each RX_ENABLE bit. 


3 — 
2$: MOV 
BIT 
BEQ 
BIS 


R4,@CSRA 
*81T2,(R 
ag 


R1,RS 


2) 


sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
sCHECK STATE OF RX_ENABLE BIT ON SELECTED LINE. 
sSKIP NEXT INSTRUCTION IF RX_ENABLE CLEAR. 

sLOG RX ENABLE BIT SET FOR SELECTED LINE. 


s Clear RX_ENBLE on lines that have ea corresponding bit set in the rx diseble 
+ line bit map. 


60$: PASS 


R1,RO 
6$ 
seere, CR 


2) 


MOV 
JSR 





sCHECK STATE OF DISABLE LINE BIT MAP. 
sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
sCLEAR RX_ENABLE BIT ON SELECTED LINE. 
sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
sSHIFT BIT MAP FOR NEXT LINE. 

sDECREMENT LINE NUMBER. 

sLOOP TO CHECK NEXT LINE. 


sRESTORE GPRS, EXCEPT 
RS ,RSSLOT( SP ) sPUT RS IN STACK SLOT. 

PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
sRS - PREVIOUS STATES OF ALL RX_ENABLE BITS. 





SEQ 0155 












6031 035512 
res | 035514 


6037 035516 
6038 035520 
6039 035522 
6040 035526 
6041 035530 
6042 035532 
6043 035534 
6044 

6045 035536 


6048 035544 


001001 


144572 
000004 


000004 


000014 


34 
3% 


s# INPUTS: 


s# OUTPUTS: 


3* COMMENTS: 


s# SUBORDINATE ROUTINES CALLED: NONE. 
b- > S08806666606606000006000 60000000 0000000000000000000000000000000000000000008 


RXENBL : : 
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- RXENBL - 


-SBTTL GLOBAL SUBROUTINE 
5 ¢% S666686600060006066600000060000000000000000000000000000000000000000000000000 
- Enable Receiver - 

This subroutine is used to enable reception on selected lines by - 
setting the essociated RX.ENABLE bit on the DUT 


RS _- Bit’s set correspond to lines on which to set RX.ENABLE. 
CSRA - Contains the eddress of the DUT CSR. 

IESTAT - Conteins the state of TXIE and RXIE bits in the CSR. 
NUMLNS - Equeted to be the meximum number of lines eveileble. 
LNCTRA - Contains the eddress of the LNCTRL register. 


RS _- Bit's set indicate previously disebled lines. 
LNCTRA - The state of the RX.ENABLE bit mey be altered. 
The contents of the IND.ADD.REG field in the CSR ere destroyed. 


s@ CALLING SEQUENCE: JSR 
* 


SAVE 

JSR 
MOV RS ,RO 
MOV #BITO,R1 
MOV LNCTRA ,R2 
MOV @NUMLNS , RS 
MOV IESTAT .R4 
CLR RS 
every line in turn,end 
MOV R4,@CSRA 
BIT #6IT2,(R2) 
BNE as 
BIS R1,R5 


F 
s Set RX.ENBLE on lines thet heave e corresponding bit set in the rx eneble 


s+ line bit map. 


RTS 


R1,RO 
6$ 
eBIT2,(R2) 
R4 
Ri 
R3 
2s 
RS 
MOV 
JSR 









SEQ 0156 





- RXENBL - 


















PC ,RXENBL 






sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sCOPY BIT MAP OF LINES TO ENABLE. 
sINITIALIZE THE SELECTED LINE BIT MASK. 
sGET THE ADDRESS OF THE LNCTRL REGISTER. 
sGET MAXIMUM LINE NUMBER. 

sGET THE STATES OF THE INT ENABLE BITS. 
sCLEAR RX.ENABLE BIT LOG OF DISABLED LINES. 


log any RX.ENBLE bit thet is cleer. 


sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
sCHECK STATE OF RX.ENABLE BIT ON SELECTED LINE. 
sSKIP NEXT INSTRUCTION IF RX.ENABLE SET. 

sLOG RX ENABLE BIT CLEAR FOR SELECTED LINE. 













sCHECK STATE OF RX.ENABLE LINE BIT MAP. 
sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
sENABLE RECEPTIONON SELECTED LINE. 

sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
sSHIFT BIT MAP FOR NEXT LINE. 

sDECREMENT LINE NUMBER. 

sLOOP TO CHECK NEXT LINE. 


sRESTORE GPRS,EXCEPT 
RS .RSSLOTC SP) sPUT RS IN STACK SLOT. 
PC ,@CSP)+ sRETURN TO PREGOS SUBRT. 
sRS - LINE BIT MAP CORRESPONDING TO THE 

s PREVIOUS LINES THAT WERE DISABLED. 
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GLOBAL SUBROUTINE 


6068 035546 
6069 035550 
6070 035552 
6071 035556 
6072 025564 
6073 035572 
6074 035574 
6075 035576 


010046 
106746 
106427 
042737 
013777 
106426 


















SEQ 0157 
- RXIEO - 
-SBTTL GLOBAL SUBROUTINE - RXIEO - 
gee SOOOEEOECESEEEEEEEEEEEEESEEESESESOEEEEEDEAESEEEEEDEEEESEEEEEEEEEEEEREREEEES 
36 - RECEIVER INTERRUPT DISABLE - 
3@ This routine is used to disable receiver interrupts in the DHV11. 
3% 
3@ INPUTS: NONE . 
3¢@ 
3@ OUTPUTS: The RX.INT.ENBL bit is cleared in the DUT CSR. 
34 IESTST -contains the updated status of the TX and RX interrupt 
i¢ enable bits. 
32% 
:# CALLING SEQUENCE: JSR PC,RXIEO 
34 
3 COMMENTS: The contents of the indirect address register field in 
34 the DUT CSR are destroyed. 
3* 
3 SUBORDINATE ROUTINES CALLED: NONE. 
3-- SOCECOEEEESEEEESEEAAEEEEEEEEEAAEEEEEEEEEAEEESEERERED ERED EEEEEREEEEEREEALE 
RXIEO:: MOV RO, -(SP) sSAVE CONTENTS OF RO ON THE STACK. 
MFPS -(SP) sSAVE PROCESSOR PRIORITY ON STACK. 
000340 MTPS @PRIO7 sIGNORE ANY INTERRUPT THAT MAY BE GENERATED. 
137777 002374 BIC 0137777, IESTAT ;CLEAR RX.INT.ENBL BIT IN IESTAT. 
002374 144506 MOV IESTAT,@CSRA sDISABLE RX INTERRUPTS. 
MIPS (SP)-+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
MOV (SP)+,RO sRESTORE RO. 


RTS PC 
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GLOBAL SUBROUTINE 


6077 
6078 
6079 
6080 
6081 
6082 
6083 


6098 035614 
6099 025622 


052737 
042737 
013777 
000207 
















SEQ 0158 


- RXIE1L - 
-SBTTL GLOBAL SUBROUTINE - RXIE1 - 
zee COOSOEEAAEEEEEEAEEEEEEDS CEEAEREESESEAEEAEEEEEDEEAEE EERE HEED EDDEDEDEEEEEEES 
34 - RECEIVER INTERRUPT ENABLE - 
33 This routine is used to enable receiver interrupts in the DHV11. 
34 
3@ INPUTS: NONE . 
34 
3@ OUTPUTS: The RX.INT.ENBL bit is set in the DUT CSR. 
34 IESTST -contains the updated status of the TX and RX interrupt 
3* enable bits. 


34 
3# CALLING SEQUENCE: JSR PC RXIEL 
& 


3 
3@ COMMENTS: The contents of the indirect address register field in 
34 the DUT CSR are destroyed. 


34 
3# SUBORDINATE ROUTINES CALLED: NONE. 
i-- SOCEEEEEEEEEEEESEAEEEEAEEAEESEEAREAEEAEEAEEEAEDEEEEEEEEEEEEEEEADAEEEEEEDEE 


000100 002374 RXIE1:: BIS @BITO6,JESTAT  ;SET RX.INT.ENBL BIT IN IESTAT. 


137677 002374 BIC 0137677, TESTAT ;CLEAR ALL OTHER BITS, EXCEPT TX AND RX I.E. 
002374 144456 on eens sENABLE RX INTERRUPTS. 
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GLOBAL SUBROUTINE 


6101 
6102 
6103 
6104 
6105 
6106 
6107 
6108 
6109 
6110 
6111 
6112 
6113 
6114 
6115 
6116 
6117 
6118 
6119 
6120 
6121 
6122 
6123 
6124 


6125 
6126 
6127 
6128 
6129 
6130 
6131 
6132 
6133 
6134 
6135 


6136 


-— 


035624 
035624 
035630 
035634 
035640 
035642 
035646 
035650 
035654 
035656 
035662 


035666 
035666 
035670 


004537 
013704 
113724 
005204 
042702 
010224 
020427 
103402 
162704 
010437 


004736 
000207 


005474 
002660 
002364 
177400 
003062 


000004 
002660 
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- SAVBMP - 


-SBTTL GLOBAL SUBROUTINE - SAVBMP - 

ee SEREEEEEEESEEEEREASEEDASEAESSEEEAEAEEAAREREESEEAEEEEAE EERE ED ERED EE EEEES 
3¢ - Save BMP codes Routine - 

34 This routine saves the parameter passed in, onto the BMP code queue 

3* together with the number of the currently executing test. 

3% 

;@ INPUTS: R2 - Contains the BMP code that is to be placed on the queue. 
i* BMPCQP - Contains address of next location in the bmp queue. 

34 BMPCQB - Label at base of the BMP code queue. 

34 BMPCQE - Label of next location after the end of the BMP queue. 
34 TSTNUM - Contains the number of the current test. 

3% 

3# OUTPUTS: BMPCQP - Incremented by 4. 

34 The contents of the BMP code queue are updated. 

;* 

7* CALLING SEQUENCE: JSR PC ,SAVBMP 

3* 

:# COMMENTS: If the overflow occurs then the last location will be 

3* overwritten by any subsequent attempts to update the queue. 


3% 
3# SUBORDINATE ROUTINES CALLED: None. 
i-- SESSA SESEEEEESEAEEEAS EA EAESAEAASEAAEAEERE AREAS AREER EAESEEEREDEEEEEEEEE 


SAVBMP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS .PREGOS sCALL REGISTER SAVE SUBRT. 
MOV BMPCOP ,R4 sGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 
MOVB TSTNUM,(R4)+ sSAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
INC R4 sINCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 
BIC #177400,R2 sCLEAR THE UNWANTED BITS FROM THE BMP CODE. 
MOV R2,(R4)+ sSAVE THE BMP CODE ON THE QUEUE. 
CMP R4, @BMPCQE sCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
BLO es sGO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 
SUB 04 ,R4 sRESET THE POINTER TO THE LAST LOCATION IN QUE. 
2s: MOV R4 ,BMPCQP sSAVE THE POINTER. 
60$: PASS sRESTORE GPRS. 
oe - JSR PC,@(SP)+ sRETURN TG PREGOS SUBRT. 
S 





SEQ 0159 
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- SETPAR - 


yee SRCCAEEEREREEEEEEAEAEREDEEOEESEEEREEEE DEES OEOEOEEEEEOE EE EEOEEEEEEDONEREEEES 


- SET TX AND CONTROL PARAMETERS - 

This suroutine is used in the FIHAVL.TST. 

It initialises the selected line to the following state: 

Internal loopback, IAUTO enabled, LPR:38.4k, 8 bits/char, 2 stop, 


Ri - Contains number of the line to be initialised. 


LNCTRL and LPR registers for the selected line are destroyed. 


6138 -SBTTL GLOBAL SUBROUTINE 
6139 
6140 is 
6141 4 
6142 34 
6143 3% 
6144 :* odd parity. 
6145 3% 
6146 3 INPUTS: 
6147 4 
6148 3* OUTPUTS: 
6149 6 
6150 3# CALLING SEQUENCE: JSR 
6151 3* 
6152 3* COMMENTS: 
6153 
6154 
6155 
6156 
6157 035672 SETPAR:: SAVE 

035672 004537 005474 JSR 
6158 035676 004737 031646 JSR PC,LINBIT 
6159 025702 010005 MOV 0,.RS5 
6160 035704 012700 000206 MOV #206 ,RO 
6161 035710 004737 040250 JSR PC ,WTWLNC 
6162 035714 012700 177670 MOV #177670,RO 
6163 035720 004737 040324 JSR PC ,WTWLPR 
6164 035724 012704 000012 MOV #10. ,R4 
6165 035720 004737 030370 JSR PC ,DELAY 
6166 
6167 035734 60$: PASS 

035734 004736 JSR 
6168 035736 000207 RTS PC 


-— 





PC,SETPAR 


3* 
3# SUBORDINATE ROUTINES CALLED: DELAY,WTWLNC,WTWLPR. 
i-- SREREEERERESESEAESSASEAEEEAAEREREEAEAEAEEEEKASAEERAAAREREAEEEEEREREEEEREEES 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sGET A BIT MAP FOR THIS LINE. 

sCOPY THE LINE BIT MAP. 

sPASS INTERNAL LOPBCK, ENABLE RX AND IAUTO. 
sINITILAISE THE LINE CONTROL REGISTER. 

sPASS THE LPR CONTENTS. 

sSET THE LPR CONTENTS TO 38.4K BAUD. 

sPASS DELAY TIME OF 10 MILLI SECONDS. 

sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 


sRESTORE GPRS. 


PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 





SEQ 0160 
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- SKPSTS - 


ze SEEEERSEEREEESESESEASAAEREEAAAEEEAARESEAEREEEEEREEAEEAEEEEEEEREDEEREDEEE EES 


- Skip Selftest Routine - 
This subroutine is used to skip the selftest after a DUT reset has been 


It must be entered immediately after setting the DUT Master 
e or after the execution of a bus reset (because of timing 


CSRA - Contains address of the DUT CSR. 
TXBFCA - Contains address of DUT DMA Buffer Count register. 


Skip selftest codes are written to the DUT registers. 


PC ,SKPSTS 


3-° SEREEEEEEEEREEEEEREREEAEREAEEEEAEAAREEEEEAEAREARERERERER SEAR ERED EREEEEEE EEA 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sPASS DELAY VALUE OF 10 MILLI-SECONDS. 
sDELAY FOR 10 MILLI-SECONDS. 


i Write skip self-test code (52525) to all the indexed DUT Registers. 


@NUMLNS!BITOS,R1_ ;FORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD. 


sTHE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
; LACK OF A M.R. BIT WRITE LOCK-OUT ON THE DHV11-M. 


sINITIALISE THE SKIP SELF-TEST CODE. 

sSELECT THE NEXT SET OF DEVICE REGISTERS. 
sGET THE ADDRESS OF THE CSR OF THE DUT. 
sSELECT A BANK OF DUT REGISTERS. 

sWRITE THE CODE TO A DUT REGISTER. 

sCOMPARE POINTER WITH LAST REGISTER ADDRESS. 
;LOOP IF NOT ALL REGS DONE IN THIS BANK. 
sTEST FOR IND.ADR.REG FIELD DECREMENTED TO 0. 
sLOOP UNTIL ALL REGISTERS CONTAIN THe CODE. 


sRESTORE GPRS. 
PC,@(SP)+ 


sRETURN TO PREGOS SUBRT. 


6170 -SBTTL GLOBAL SUBROUTINE 
6171 
6172 34 
6173 3% 
6174 34 initiated. 
6175 3* Reset routin 
6176 ;* considerations). 
6177 3% 
6178 ;* INPUTS: 
6179 3* 
6180 3% 
6181 3# OUTPUTS: 
6182 3* 
6183 3# CALLING SEQUENCE: JSR 
6184 3* 
6185 :* COMMENTS: 
6186 3% 
6187 3* SUBORDINATE ROUTINES CALLED: DELAY. 
6188 
6189 
6190 035740 SKPSTS:: SAVE 

035740 004537 005474 JSR 
6191 025744 012704 000012 MOV #10. ,R4 
6192 035750 004737 030370 JSR PC ,DELAY 
6193 i+ 
6194 
‘6195 3° 
6196 035754 012701 000050 MOV 
6197 
6198 
6199 035760 012703 052525 MOV #52525 ,R3 
6200 035764 005301 4$: DEC R1 
6201 035766 013704 002300 MOV CSRA,R4 
6202 035772 010124 MOV R1,(R4)+ 
6203 035774 010324 6$: MOV R3,(R4)+ 
6204 035776 020437 002316 CMP R4,TXBFCA 
6205 036002 103774 BLO 6$ 
6206 036004 032701 000017 BIT #17,R1 
6207 036010 001365 BNE 4$ 
6208 
6209 036012 60$: PASS 

036012 004736 JSR 
6210 036014 000207 RTS PC 


— 








SEQ 0161 
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6212 
6213 
‘ 6214 
6215 
6216 
6217 
6218 
6219 
6220 
6221 
6222 
6223 
6224 
6225 
6226 
6227 
6228 
6229 


6230 
6231 
6232 
6233 


6234 
6235 
6236 
6237 
6238 


—— 


036016 
036016 
036022 
036024 
036030 
036032 
036032 
036034 


004537 
010146 
012746 
000002 


004736 
000207 


- STPSW - 


005474 
036032 
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-SBTTL GLOBAL SUBROUTINE 

5 O+ SHRRESEREEEEDEEEEESEREEEEEEEDEEEDDES ODED OS 0606 04000000000000044000000044 
- SET PROCESSOR STATUS WORD - 

THIS ROUTINE SETS THE PSW TO THE CONTENTS OF R1. 


Ri - CONTAINS THE NEW PSW SETTINGS 
PSW - SET TO THE CONTENTS OF R1 


SEQUENCE : 


- STPSW - 


JSR PC,STPSW 


USED IN THE DMA ADDRESS TEST TO SET THE “trermeaeen 


PRIORITY WITHOUT MAKING A CALL TO THE DRS 


NES CALLED: 


NONE . 


§EREERERAEREEAEAEAEEAEEEEEEAEEAREREREREAEAEAREAAEEEEEEEAEEAREREREEEA LARA RE ES 


3% 
3% 
3* 
34 INPUTS: 
3* 
:* OUTPUTS: 
7* 
i* CALLING 
7* 
;* COMMENTS : 
3% 
7% 
3* SUBROUTI 
STPSW:: SAVE 

MOV 

MOV 

RTI 
ADDR: PASS 

RTS 


JSR 
Ri, -(SP) 
#ADOR, -( SP) 


JSR 
PC 





RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
;PUSH THE NEW PSW CONTENTS ONTO THE STACK 
sPUSH THE NEW PC VALUE ONTO THE STACK 
;LOAD THE NEW PC AND PSW 


PC,@(SP)+ ;RETURN TO PREGOS SUBRT. 


sRETURN 












SEQ 0162 
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6263 036036 


6267 036040 
6268 036042 
6269 036044 
6270 036046 
6271 036050 


6275 036052 
6276 036056 
6277 036060 
6278 036062 
6279 036064 
6280 036066 


6284 036070 
6285 036072 
6286 036074 
6287 036076 
6288 036100 


6290 036102 
6292 036104 


r-— 


010046 


010146 
010246 
010346 
010446 
010546 


012700 
012001 
012002 
012003 
012004 
012005 


012640 
012640 
012640 
012640 
012640 


012600 
000207 


- STPSW - 


002634 


-SBTTL GLOBAL SUBROUTINE 


i++ SERRSEEEAEEEEREEEEAAASEAESAEAREREREEAEAEESEEEESAEAREEAAREAAEEEREDEEEREREDED 


3* 


3* INPUTS: 


:# OUTPUTS: 


* 
3* COMMENTS: 


- SWAPO - 


- Swap GPRs With GPR Set 0 Routine - 

This subroutine swaps the present contents of GPRs R1 thru R5 with 
the contents of the number zero GPR save area. The contents of RO 
are not altered by this subroutine. 


GPR contents R1 thru RS. 
GPRSOB - Label at base of GPR save area number zero. 


Ri thru RS contain the previous contents of GPR save area 
zero words 1 thru 5 respectively. 

GPRSO - GPR save area 0 words 1 thru 5, contain previous 
contents of GPRs Ri thru R5 respectively. 


s# CALLING SEQUENCE: JSR 


The state of the CARRY flag is not alterred by this routine. 


PC , SWAPO 


3* 
;* SUBORDINATE ROUTINES CALLED: None. 


t-- SEREEEEREEREREREEEEEERESAEAEESEASARAEEAEREAASARAAEERESEAEARAEEALEREEEAEEREE 


SWAPO: : 


3* 
; Load the GPRs 


MOV 


MOV 
MOV 
MOV 
MOV 
MOV 


RO, -CSP) 


i+ 
; Load the stack from the GPRs. 


R1,-CSP) 
R2,-CSP) 
R3,-(SP) 
R4, -(SP) 
RS,-(SP) 


sSAVE THE CONTENTS OF RO. 


sSAVE THE CONTENTS OF R1. 
sSAVE THE CONTENTS OF R2. 
sSAVE THE CONTENTS OF R3. 
sSAVE THE CONTENTS OF R4. 
sSAVE THE CONTENTS OF RS. 


from the GPR save area 0. 


#GPRSOB,RO 
CRO)+,R1 
(RO)+,R2 
CRO)+,R3 
(RO)+,R4 
C(RO)+,R5 


sGET THE BASE ADDRESS OF GPR SAVE AREA 0. 
sLOAD Ri WITH GPR SAVE AREA 0 WORD 1. 
sLOAD Ri WITH GPR SAVE AREA 0 WORD 2. 
sLOAD Ri WITH GPR SAVE AREA 0 WORD 3. 
sLOAD R1 WITH GPR SAVE AREA O WORD 4. 
;LOAD R1 WITH GPR SAVE AREA 0 WORD 5. 


3° 
; Load the GPR save area 0 from the stack. 


MOV 
MOV 
MOV 
MOV 
MOV 


MOV 


RTS 


(SP)+,-CRO) 
CSP)+,-CRO) 
(SP)+,-CRO) 
(SP)+,-CRO) 
(SP)+,-CRO) 


(SP)+,RO 
PC 





sLOAD GPR SAVE AREA 0 WORD 5 WITH SAVED RS. 
sLOAD GPR SAVE AREA 0 WORD 4 WITH SAVED R4. 
sLOAD GPR SAVE AREA 0 WORD 3 WITH SAVED R3. 
sLOAD GPR SAVE AREA 0 WORD 2 WITH SAVED R2. 
sLOAD GPR SAVE AREA 0 WORD 1 WITH SAVED R1. 


sRESTORE THE INITIAL VALUE OF RO. 




















SEQ 0163 


GLOBAL SUBROUTINE 


6315 036106 





ine ee 
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036106 004537 005474 
6316 036112 012701 036130 
6317 036116 012737 025034 


6318 036124 
036124 104460 

6319 036126 000432 

6320 036130 040 
036133 116 
036136 105 
036141 124 
036144 040 
036147 123 
036152 105 
036155 117 
036160 106 
036163 116 
036166 104 
036171 111 
036174 040 
036177 123 
036202 105 
036205 103 
036210 111 
036213 000 

6321 

6322 036214 
036214 004736 

6323 036216 000207 


| 
LL 





- TSABRT - 
-SBTTL GLOBAL SUBROUTINE - TSABRT - 
gee SEREEAEEEAAEEEEEEAEREEAESAEEEAEAEREAEEEEED EE EEE EEEEEE ES ODED EREEEEEEEEER EDS 
3% - TEST ABORT ROUTINE - 
;* This subroutine is used when a non-test related error has been found 
;* during the execution of the current test. 
;* It is used to inform the operator that the current test has been 
Hed aborted. 
3* 
;* INPUTS: ERRMSG - Contains the name of the current test. 
;* ERRNBR - Contains the correct error number. 
3% The remainder of the ERRTBL is correctly initialised. 
3% 
3* OUTPUTS: Messages are reported to the operator. 


3% 

;* CALLING SEQUENCE: JSR PC, TSABRT 
3* 

;* COMMENTS: 


;* 
;# SUBORDINATE ROUTINES CALLED: ER1603. 
i-- SEREEEEREEERERASEEEEEAEEARAERESEEAEAAEARAEEEEA EASE REDE ERED ERED EAEEEEEREEEEES 


TSABRT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV #2$,R1 sPASS ADORESS OF FIRST MESSAGE TO BE REPORTED. 
MOV #ER1603,ERRBLK ;SET-UP THE ERROR REPORTING ROUTINE. 
ERROR ; >>>>> ERROR <<<c<, 
TRAP CSERROR 
BR 60$ ; 
2s: -ASCIZ / NON-RELATED TEST ERROR FOUND DURING TEST EXECUTION/ 
-EVEN 
60$: PASS sRESTORE GPRS. 
-_ = JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 






SEQ 0164 
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6345 036220 

036220 
6346 036224 
6347 036226 
6348 036232 
6349 036236 

036236 
6350 036240 


r— 


004537 
010003 
012702 
004737 


004736 
000207 


005474 


004012 
030624 





- TXDATP - 


-SBTTL GLOBAL SUBROUTINE 
ae RESEEEEERASEREEEEAEEESAE EA EESEEA ERED EE EEES ED EEEEEEEEEEEDEEEREEEEREREEEEELE 
- TRANSMIT DATA PATTERN - 

This subroutine is used in the FIHAVL.TST. 

It transmits a specified number of date bytes on the specified line. 


RO - Contains the number of data bytes to TX. 
Ri - Contains line numb on which transmission is to take place. 
BUFBAS to BUFMID contains a 256 byte data pattern. 


3% 
3* 


OUTPUTS: 


COMMENTS: 


- TXDATP - 


Date is sent out on the specified line. 
Carry set = TX successful. 


CALLING SEQUENCE: TXDATP 


;* 
3* SUBORDINATE ROUTINES CALLED: DODMA. 
i-- SEREEEEEEEREEEREESEAEAAEAEREAERESAEASAEAEERAREREESEAEREDEEEDESESEAEARERERRS 


TXDATP:: SAVE 


MOV 

MOV 
JSR 
PASS 


RTS 


JSR 
RO,R3 
@BUF BAS ,R2 
PC ,DODMA 


JSR 
PC 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 

sPASS THE NUMBER OF CHARS TO TX. 

sPASS THE START OF THE DATA PATTERN TO TX. 

s TRANSMIT THE DATA PATTERN. 

sRESTORE GPRS. 

PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 














SEQ 0165 
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SEQ 0166 


6352 -SBTTL GLOBAL SUBROUTINE - TXDONE - 
6353 b¢¢ ShOOSDEEOEO EEO O6 0640000404 04004008 04080 OOOO hk kkk Ohhh eh eens ene 
6354 3% - TRANSMISSION DONE - 
6355 3% This subroutine is used in the transmission/reception tests to allow 
= 3% time for transmission to complete on outstanding lines. 
3* 
6358 3* INPUTS: ACTLNS - Contains bit map of all active lines. 
6359 3* TXDONF - TX done flags, set for lines that have sent all chars. 
acer ;* CHCNT - Table contaning the number of chars to be TX'd. 
;* 
6362 i* 
94 3* OUTPUTS: Transmission interrupts are disabled. 
4 3* 
6365 ;* CALLING SEQUENCE: JSR PC, TXDONE 
6366 3% 
6367 3* COMMENTS: 
6368 3* 
6369 ;# SUBORDINATE ROUTINES CALLED: MSLOOP,MUL16U. 
6370 b-- SERREREREE GEES 64640006 06 04000004 OOOO Ok Ok kkk kk hk he eeeee 
6371 
6372 036242 TXDONE:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
eave 036242 004537 005474 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
3* 
6374 ; Check if all active lines have completed transmission. 
6375 ; f any have not yet completed, determine the tx char count for a 
6376 ; line that has cutstanding characters to transmit. Using this value, 
rd + calculate the time-out value needed at the currently selected baud rate. 
6379 036246 013703 002272 MOV ACTLNS ,R3 sGET THE ACTIVE LINE BIT MAP. 
6380 036252 013702 002652 MOV TXDONF ,R2 sGET THE BIT MAP OF LINES THAT HAVE COMPLETED. 
6381 036256 040203 BIC R2,R3 sGENERATE A BIT MAP OF LINES THAT ARE STILL TX. 
6382 036260 005703 TST R3 sCHECK IF ALL LINES HAVE COMPLETED Tx. 
coor 036262 001427 BEQ 6$ 3GO DISABLE TX INTERRUPTS IF ALL DONE. 
84 3+ 
6385 ; Find a line that has not completed transmission. 
6386 ; Obtain the expected character count for that line (which is the same for 
6387 ; all other lines with outstanding tx's). 
coos ; Calculate time-out value. 
6 — 
6390 036264 005004 CLR R4 sCLEAR LINE NUMBER COUNTER. 
6391 036266 012702 000001 MOV #1,R2 s;SELECT BIT MAP FOR THE FIRST LINE. 
6392 036272 030203 2s: BIT R2,R3 sSEE IF THIS LINE HAS COMPLETED. 
6393 036274 001003 BNE 4s sBRANCH IF THIS LINE HAS NOT COMPLETED Tx. 
6394 036276 006102 ROL R2 sSHIFT THE LINE BIT MAP FOR THE NEXT LINE. 
6395 036300 005204 INC R4 s INCREMENT THE LINE NUMBER COUNTER. 
6396 036302 000773 BR 2s sLOOP TO CHECK THE NEXT LINE. 
6397 036304 006304 4$: ASL R4 sLINE NUMBER X 2 TO OBTAIN OFFSET INTO TABLE. 
6398 036306 016401 003612 MOV CHCNTB(R4),R1 ;sGET THE EXPECTED NUMBER OF CHARS TO BE TX'D. 
6399 036312 013702 002402 MOV RXTOUT ,R2 sGET THE CURRENT TIME-OUT VALUE FOR ONE CHAR. 
6400 036316 004737 032056 JSR PC ,MULi6U sCNUMBER OF CHARS TO TX) X (TIME-OUT OF 1 CHAR) 
eee 036322 006301 ASL Ri sMULTIPLY DELAY TIME BY 2 TO GIVE A SAFE VALUE. 
3? 
6403 ; Wait for all oustanding transmissions to complete or time-out. 
coor ; Disable all transmission interrupts. 
ice 
6406 036324 013702 002272 MOV ACTLNS ,R2 sPASS A BIT MAP OF THE BITS TO TEST. 
6407 036330 010203 MOV R2,R3 sPASS THE EXPECTED STATE OF THE TXDONF. 


— 
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6408 036332 

6409 036336 

6410 036342 

6411 

6412 036346 
036346 

6413 036350 


— 


012704 
004737 
004737 


004736 
000207 


002652 
032042 
036542 


- TXDONE - 


6$: 


60$: 





@TXDONF ,R4 
PC ,MSLOOP 
PC, TXIEO 


JSR 
PC 





SEQ 0167 


sPASS THE ADDRESS OF THE WORD TO TEST. 
sWAIT FOR TIME-OUT OF TX COMPLETION. 
sDISABLE ALL TX INTERRUPTS. 


sRESTORE GPRS. 
PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 








































6439 036352 

036352 
6440 036356 
6441 036360 
6442 036364 
6443 036370 
6444 036372 
6445 036376 
6446 036402 


6450 036404 
6451 036410 
6452 036412 
6453 036414 


6458 036416 
6459 036420 


6467 
6468 036444 





005474 


000001 
002314 


000010 
002374 


143670 


000200 


000014 


- TXDONE - 


3# CALLING SEQUENCE: JSR 
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-SBTTL GLOBAL SUBROUTINE 
{Oo SHOR ObO EOE OE HO 06 406 060000 0000000000 0000 06000000600000000000 00000000008 


This subroutine is used to disable transmission on selected lines by, 
clearing the associated TX.ENABLE bit on the DUT. 


3* COMMENTS: 


TXDSBL: : 


° 


3 
; Clear TX.ENBLE on lines that have ea corresponding bit set in the tx diseble 
s line bit map. 
: 


4$: 


63: 


; 
3# SUBORDINATE ROUTINES CALLED: NONE. 
b-- OhOO6 6600046 $6 6000 0000000000 0006 000800000000 4000000000000000000800000000008 


SAVE 


every line in turn, and log the state of each TX.ENABLE bit. 


MOV 

TSTB 
BPL 
BIS 


SEQ 0168 


- TXDOSBL - 
- Transmitter Disable - 


RS - Bit's set correspond to lines on which to clear TX.ENABLE. 
CSRA - Contains the eddress of the DUT CSR. 

IESTAT - Contains the state of TXIE and RXIE bits in the CSR. 
NUMLNS - Equated to be the meximum number of lines aveileble. 
TXAD2A - Contains the address of the TBUFFAD2 register. 


RS - Bit's set indicate the initial states of all TX.ENBLE bits. 
TBUFFAD2 - The state of the TX.ENBLE bit may be altered. 
The contents of the IND.ADD.REG field in the CSR ere destroyed. 


PC, TXDSBL 


sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


RS,RO sCOPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 
#BITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 

TXAD2A ,R2 sGET THE ADORESS OF THE TBUFFAD2 REGISTER. 

R2 sGET THE ADORESS OF THE MSBYTE OF TBUFFAD2 REG. 
@NUMLNS , R3 sGET MAXIMUM LINE NUMBER PLUS ONE. 

IESTAT ,R4 sGET THE STATES OF THE INT ENABLE BITS. 

RS sLOG POSSIBLE TX DISABLED ON ALL LINES. 


R4,QCSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
(R2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
4$ sSKIP NEXT INSTRUCTION IF TX.ENABLE CLEAR. 
R1,RS sLOG TX ENABLE BIT SET FOR SELECTED LINE. 


R1,RO sCHECK STATE OF DISABLE LINE BIT MAP. 


6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
@BIT7,(R2) sCLEAR TX.ENABLE BIT ON SELECTED LINE. 

R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
R1 sSHIFT BIT MAP FOR NEXT LINE. 

R3 sDECREMENT LINE NUMBER. 

2s sLOOP TO CHECK NEXT LINE. 


RS sRESTORE GPRS,EXCEPT 
MOV RS ,RSSLOT( SP) sPUT RS IN STACK © 
JSR PC ,@(SP)-+ sRETURN TO PREGO- 
sRS - PREVIOUS STATES OF ALL TX.ENABLE BITS. 









































6506 036506 















100401 


CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 122 
GLOBAL SUBROUTINE 





005474 


000001 
002314 


000010 
002374 


143574 


000200 


000014 


- TXENBL - 


-SBTTL GLOBAL SUBROUTINE - TXENBL - 

b¢¢ C6666000606006 6606 0600000060000 0000060000 00000000000000000000000000000000000 
34 - Transmitter Enable - 

3% This subroutine is used to enable trensmission on selected lines by 

3@ setting the essociated TX.ENABLE bit on the DUT. 

3% 

3@ INPUTS: RS _- Bit's set correspond to lines on which to set TX.ENABLE. 
3% CSRA - Conteins the eddress of the DUT CSR. 

3¢ IESTAT - Contains the state of TXIE and RXIE bits in the CSR. 
3% NUMLNS - Equeted to be the maximum number of lines eveileble. 
;e TXAD2A - Contains the eddress of the TBUFFAD2 register. 

3% 

3* OUTPUTS: RS - Bit's set indicate gy | disebled lines. 

;e TBUFFAD2 - The state of the TX.ENBLE bit may be altered. 

3% The contents of the IND.ADD.REG field in the CSR are destroyed. 
3% 

3# CALLING SEQUENCE: JSR PC, TXENBL 

3% 

3 COMMENTS: 

2 


; 
s# SUBORDINATE ROUTINES CALLED: NONE. 
b-- 9860666060606060 00606006 0006000000000000000600060006000000000000000000000008 


TXENBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV RS ,RO sCOPY BIT MAP OF LINES TO ENABLE. 
MOV #6ITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 
MOV TXAD2A ,R2 sGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 
INC R2 sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
MOV @NUMLNS , R3 sGET MAXIMUM LINE NUMBER. 
MOV IESTAT.R4 sGET THE STATES OF THE INT ENABLE BITS. 
CLR RS sCLEAR TX.ENABLE BIT LOG OF DISABLED LINES. 
3¢ 
s Select every line in turn,and log any TX.ENBLE bit thet is cleer. 
ge 
2%: MOV R4,@CSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
TSTB (R2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
BMI as sSKIP NEXT INSTRUCTION IF TX.ENABLE SET. 
BIS R1,RS sLOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 


; 
s Set TX.ENBLE on lines that heave e corresponding bit set in the tx enable 
s line bit map. 


4$: BIT R1,RO sCHECK STATE OF TX.ENABLE LINE BIT MAP. 
BEQ 6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
BISB #BIT7,(R2) sENABLE TRANSMISSION ON SELECTED LINE. 
63: INC R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
ASL Ri sSHIFT BIT MAP FOR NEXT LINE. 
DEC a3 sDECREMENT LINE NUMBER. 
BNE és sLOOP TO CHECK NEXT LINE. 
608; PASS RS sRESTORE GPRS, EXCEPT 
MOV RS .RSSLOT( SP) sPUT RS IN STACK SLOT. 
JSR PC .@(SP)+ sRETURN TO PREGOS SUBRT. 


sRS - LINE BIT MAP CORRESPONDING TO THE 
om ec s PREVIOUS LINES THAT WERE DISABLED. 
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6543 036542 
6544 036544 
6545 036546 
6546 036552 
6547 026560 
6548 036566 
6549 036570 
6550 036572 


010046 
106746 
106427 
042737 
013777 
106426 
012600 
000207 








SEQ 0170 


- TXIEO - 
-SBTTL GLOBAL SUBROUTINE - TXIEO - 
gee SOCEEEEESESEEECEEEEEEEESESESOAEEEEEAEEEEEEHESEEAEDEEEEESEEEEEEDEEEEEEEEEEEE 
34 - TRANSMITTER INTERRUPT DISABLE - 
34 This routine is used to disable transmitter interrupts in the DHV11. 
58 
3@ INPUTS: NONE. ° 
3% 
3@ OUTPUTS: The TX.INT.ENBL bit is cleared in the DUT CSR. 
34 IESTST -contains the updated status of the TX and RX interrupt 
3¢ enable bits. 
3% 
3@ CALLING SEQUENCE: JSR PC, TXIEO 
34 
3* COMMENTS: The contents of the indirect address register field in 
34 the DUT CSR are destroyed. 


3* ; 
3# SUBORDINATE ROUTINES CALLED: NONE. 


a-- SEREAEEEERERSAEAEAAAEEEAESESESSESEAASEEAEEREEAEREDEEADEAEEEREEEREEEEEREEERES 


TXIEO:: MOV RO, -(SP) sSAVE CONTENTS OF RO ON THE STACK. 

MFPS -(SP) sSAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 
000340 MTPS @PRIO7 sIGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 
177677 002374 BIC 0177677, IESTAT ;CLEAR TX.INT.ENBL BIT IN IESTAT. 
002374 143512 MOV IESTAT,@CSRA sDISABLE TX INTERRUPTS. 

MTPS (SP)-+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

on a sRESTORE RO. 

S 
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GLOBAL SUBROUTINE 


6552 
6553 
6554 
6555 
6556 
6557 
6558 
6559 


6570 

6571 036574 
6572 036602 
6573 036610 
6574 026616 


052737 
042737 
013777 
000207 


040000 
137677 
002374 
















SEQ 0171 
- TXIE1 - 


-SBTTL GLOBAL SUBROUTINE - TXIE1 - 

Foo SAOSEEEEOREEEAREEAEREDEEEEEES EER EREEEREROEEEEEEEEEEEDEEEEDEREEEEEEEREREDEEE 
34 - TRANSMITTER INTERRUPT ENABLE - 

34 This routine is used to enable transmitter interrupts in the DHV11. 

3% 

3@ INPUTS: NONE. 

34 

3@ OUTPUTS: The TX.INT.ENBL bit is set in the DUT CSR. 

13 IESTST -contains the updated status of the TX and RX interrupt 
34 enable bits. 


34% 
3# CALLING SEQUENCE: JSR PC, TXIE1L 


3% 

3* COMMENTS: The contents of the indirect address register field in 

34 the DUT CSR are destroyed. 

34# 

3 SUBORDINATE ROUTINES CALLED: NONE. 

3-- SERRA EESEEAEDEEEEEAEEEREASSAEEEEAAAAESEAESRERERADEEAEAREEEEEALEEEEDREEED 


002374 TXIE1:: BIS @B1T14,IESTAT  ;SET TX.INT.ENBL BIT IN IESTAT. 

002374 BIC 0137677, IESTAT ;CLEAR ALL BITS EXCEPT TX RX I.E BITS. 

143462 A on sDISABLE TX INTERRUPTS. 
S 





a 
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SEQ 0172 

GLOBAL SUBROUTINE - TXRINI - 
6576 -SBTTL GLOBAL SUBROUTINE - TARINI - 
6577 FO + SROSSOOEOEEESEEEEEEEEEEEEAEDEDREEEDEDEE ODODE OOOO DEOD06400000000060000060008 
6578 34 - Transmit and Receive Initialization Routine - 
6579 74 This subroutine performs the initialization of the verious pointers, 
6580 34 counters, and flags which ere used during the transmission and 
6581 34 reception portion of a test. This initialization is performed on 
pee ;4 the specified lines only, other line variables remain unchanged. 

3% 

6584 3@ INPUTS: CHCNTB - Label at base of line character count table. 
6585 3* CHRTOT - Max @ of chars to RX on lines already initialized. 
6586 34 DPENDB - Label at base of line data pattern end table. 
6587 34 DPLENB - Label at base of line data pattern length table. 
6588 34 EXCNTB - Label at base address of extra char counters table. 
6589 34 IESTAT - Present state of the RX.IE and TX.IE bits. 
6590 34 NUMLNS - Equated to number of lines on the DUT. 
6591 34 RXCNTB - Label at base address of RX character counters table. 
6592 34 RXPTRB - Lable at base adr of "next RX char” pointers table. 
6593 34 TXCNTB - Label at base address of TX character counters table. 
6594 34 TXPTRB - Label at base adr of “next TX char” pointers table. 
6595 34 CBB - Label at base of TX/RX control block. 
6596 34 CB Contents - TX/RX control block contains the following: 
6597 3* CBLPRA - DUT LPR contents. 
6598 34 CBLNCA - DUT LNCTRL contents. 
6599 3* CBDPAA - Address of beginning of data pattern. 
6600 34 CBDPLA - Length in bytes of data pattern. 
6601 34 CBDPNA - Number of date patterns to transmit. 
6602 i* CBMAPA - Bit map of lines to be initialized. 
6603 3* CBLPBA - Type of loopback to be used for test. 
6604 34 CBOFSA - Amount to offset each TX start in the data pat. 
6605 34 TXRXLB - Label at base of TX/RX line association table. 
6606 Hd 
6607 3# OUTPUTS: CHCNT - Table of number of line TX characters (Initialized). 
6608 3% CHRTOT - Maximum number of chars to receive (2 * pat length). 
6609 34 DPEND - Table of data pattern ends (Initialized). é 
6610 34 DPLEN - Table of data pattern lengths (Initialized). 
6611 34 DUT LNCTRL - Line control registers (Initialized). 
6612 :4 DUT LPR - Line parameter registers (Initialized). 
6613 3* EXCNT - Table of extra RX char counts (Clred, selected lines). 
6614 3* RXCNT - Table of RX character counts (Clred, selected lines). 
6615 34 RXDONF - “Reception Done” flags (Cleared for selected lines). 
6616 34 RXPTR - Table of receive pointers (Initialized). 
6617 34 TXCNT - Table of TX character counters (Clred, selected lines). 
6618 ;* TXDONF - “Transmission Done” flags (Clred for selected lines). 
6619 :* TXPTR - Table of transmit pointers (Initialized). 
6620 34 TXRXL - TX/RX line association table (Initialized). 
6621 i* 
6622 ;* CALLING SEQUENCE: JSR PC, TXRINI 
6623 34 
6624 ;# COMMENTS: If the calculation of the CHRTOT value (2 times the data 
6625 3* pattern length) results in a number greater than 64K then 
6626 ;* CHRTOT is initialized to 64K - 1. 
6627 3* This routine will not force internal loopback based on the 
6628 34 loopback type in CBLPBA. The user must set up CBLNCA correctly 
6629 34 to get internal loopback. 
6630 :* 
6631 s# SUBORDINATE ROUTINES CALLED: WTWLNC,WTWLPR, 
6632 t-- SHEREEESEAEASEAAEAEEEEEEEEAEARAAAEAAKASREREAREAEAAAREAEARAREERRALAAAEEALEEE 
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r-— 


6633 
6634 


036620 
036620 


036624 
036630 
036634 
036642 
036644 
036650 
036654 
036660 
036664 


036670 
036672 
0366 76 
036702 
036704 
036712 


036714 
036720 
036724 
036730 
036734 
036740 
036742 
036746 
036750 
036756 


036756 
036764 


036770 
036774 


037000 
037002 
037010 
037012 
037014 
037020 


004537 


013705 
013700 
023727 
001002 
052700 
004737 
013700 
004737 
004737 


005004 
013705 
013703 
060503 
036437 
001452 


013701 
013702 
004737 
010164 
060137 
103403 
060137 
103003 
012737 


013764 
010364 


005064 
010564 


010402 
023727 
001003 
006202 
116202 
010264 





005474 


003304 
003274 
003306 


000200 
040250 
003272 
040324 
036446 


003276 
003300 


002534 


003300 
003302 
032056 
003612 
002646 


002646 
177777 


005444 
005364 


- TXRINI - 
TXRINI:: SAVE 


000001 


003304 


002646 


003352 
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JSR 


SEQ 0173 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


7¢ 
; Set up the LPR and LNCTRL registers as specified in the TX/RX Control Block. 


2s: 


3* 


CBMAPA,RS 
CBLNCA,RO 
CBLPBA, #1 
2s 

#200 ,RO 
PC ,WTWLENC 
CBLPRA,RO 
PC ,WTWLPR 
PC, TXENBL 


sGET THE BIT MAP OF SELECTED LINES. 

sGET THE NEW LNCTRL CONTENTS. 

sCHECK IF INTERNAL LOOPBACK HAS BEEN SELECTED. 
sSKIP SETTING INT. LOPBCK IN MAINTENANCE FIELD. 
sSET INTERNAL LOOPBACK IN MAINTENANCE FIELD. 
sSET UP THE LNCTRL REGS FOR SELECTED LINES. 
sGET THE NEW LPR CONTENTS. 

sSET UP THE LPR REGISTERS FOR SELECTED LINES. 
sENABLE TX FOR ALL SELECTED LINES. 


; Set up and begin loop which handles one line per iteration. 


4$: 


CLR 
MOV 
MOV 
ADD 
BIT 
BEQ 


R4 sCLEAR THE LINE OFFSET. 

CBOPAA,RS sINITIALIZE THE TX START ADDRESS VALUE. 
CBDPLA,R3 sGET THE LENGTH OF THE DATA PATTERN. 

RS ,R3 sCALCULATE END ADDRESS OF THE DATA PATTERN. 
BITTBL(R4),CBMAPA ;CHECK IF THIS LINE IS SELECTED FOR INIT. 
12$ sSKIP SET UP IF LINE IS NOT SELECTED. 


3* 

; This line is selected for initialization. 

Set up proper entry in number of chars to TX and RX table. 

Include char count on this line in max allowable char total for all lines. 


10$: 


3* 


CBDPLA,R1 
CBDPNA ,R2 
PC ,MUL16U 
R1,CHCNTBCR4 ) 
R1,CHRTOT 


6$ 
R1,CHRTOT 
8$ 
-1,CHRTOT 


sGET THE LENGTH OF THIS LINE‘S DATA PATTERN. 
sGET THE NUMBER OF PATTERNS TO TX AND RX. 
sCALCULATE THE TOTAL NUMBER OF CHARS TO TX/RX. 
sSET UP THE NUMBER OF TX/RX CHARS FOR LINE. 
sADD TWICE THE NUMBER OF CHARACTERS TO TX/RX 

+ ON THIS LINE TO THE TOTAL NUMBER OF CHARS 

+ WHICH WE WILL ALLOW TO BE RECEIVED ON 

ALL LINES. 

+ SET MAX CHAR TOTAL TO -1 IF OVERFLOW. 


; Set up the data pattern end and length for this line. 


MOV 
MOV 
;* 
; Set up 


- 


CBDPLA ,OPLENBC(R4 ) 


R3,DPENDBC(R4 ) 


TXCNTBC(R4) 
RS, TXPTRBCR4) 


R4,R2 
CBLPBA , #2 
10$ 

Re 
STGTRB(R2) ,R2 
R2, TXRXLBCR4) 





;SET UP TX DATA PATTERN LENGTH FOR THIS LINE. 
sSET UP TX DATA PAT END ADDRESS FOR THIS LINE. 


the TX counter and character pointer for this line. 


sCLEAR THE TX COUNTER FOR THIS LINE. 
sSET UP THE TX CHAR POINTER FOR THIS LINE. 


the TX/RX line association offset table entry for this line. 


sSELECT LINE OFFSET FOR NON-STAGGERED LPBK. 
sTEST FOR STAGGERED LOOPBACK. 

sSKIP SETTING STAGGERED LPBK IF NOT. 

sFORM BYTE OFFSET INTO TABLE FROM TX LINE @. 
sGET THE RX LINE CORRESPONDING WITH TX LINE. 
sLOAD TX TABLE ENTRY WITH RX LINE OFFSET. 








GLOBAL SUBROUTINE 


6689 

66°90 

6691 

6692 

6693 037024 

6694 037030 

6695 037034 

6696 

6697 

6698 

6699 037040 

6700 037044 

6701 037046 

6702 037050 

6703 037054 

6704 

6705 

6706 

6707 037056 

6708 037060 

6709 

6710 

6711 

6712 037062 

6713 037066 

6714 

6715 037070 
037070 

6716 037072 


-— 


005062 
005062 
010562 


063705 
020503 
103403 
163705 
000773 


005204 
005204 


020427 
002706 


004736 
000207 


003712 
003412 
003552 


003310 


003300 


000020 





Tl 
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SEQ 0174 
- TXRINI - 
ze 
; Set up the RX counters and character pointer for the RX line which 
3 is associated with this TX line. 
} es 
CLR RXCNTBC(R2) sCLEAR THE RX COUNTER FOR THIS RX LINE. 
CLR EXCNTBC(R2) sCLEAR THE EXTRA CHAR COUNTER FOR THIS RX LINE. 
MOV RS ,RXPTRBCR2) sSET UP THE RX CHAR POINTER FOR THIS RX LINE. 
3° 
; Update the TX start pointer in preparation for the next line. 
Te 
12$: ADD CBOFSA,RS sADD THE TX OFFSET TO THE TX START POINTER. 
14$: CMP R5,R3 sCOMPARE TX START WITH END OF DATA PATTERN. 
BLO 16$ sSKIP WRAPAROUND IF START IS BEFORE PAT END. 
SUB CBDPLA,RS sSUBTRACT DATA PATTERN LENGTH FROM START. 
BR 14$ sLOOP UNTIL START IS WITHIN DATA PATTERN. 
+ 
; Update the TX line number offset to the next line. 
:- 
16$: INC R4 
INC R4 
3° 
; Test for done handling all possible lines on the device. 
— 
CMP R4, @NUMLNS#2 sCOMPARE OFFSET WITH 2 TIMES MAX # OF LINES. 
BLT 4$ sLOOP IF NOT ALL LINES DONE. 
60$: PASS s;RESTORE GPRS. 


JSR PC,a(SP)-+ sRETURN TO PREGOS SUBRT. 
RTS PC 


CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 126 





GLOBAL SUBROUTINE 


6718 
6719 
6720 
6721 
6722 
6723 
6724 
6725 
6726 
6727 
6728 
6729 
6730 
6731 
6732 
6733 
6734 
6735 
6736 
6737 
6738 
6739 
6740 


6741 
6742 
6743 
6744 
6745 
6746 


6747 


-— 


027074 
037074 
037100 
037104 
037110 
037114 
037120 
037124 
037124 
037126 


004537 
106737 
106427 
012705 
004737 
010537 


004736 
000207 


005474 
002406 
000240 
000377 
036352 
002404 


- TXROFF - 


-SBTTL GLOBAL SUBROUTINE 
zee SEOSEEEEEEEEEEEEEEEEREEE ODES OD OEEEREDE EE OD ES OOEEEEEOOD OE ODEEEEEEEEEEEEEEEDE 
- Turn TX and RX off Routine - 
This subroutine is used to turn off DUT transmission and reception. 
This routine achieves this by veg mete Ayes nay priority to 5 to 

e a 


avoid RX interrupts and by c 


- TXROFF - 


ering the DUT TX.ENABLE bits to 


halt TX Ceither DHA or single character TX). The states of the 
TX.ENABLE bits and the processor priority are saved for restoration 
when TX and RX are re-enabled. 


3* 

3* INPUTS: 
3* 

3* OUTPUTS: 


3;* 


TXROFF: : 


60$: 


SAVE 


MAPLNS - Bit map of all possible lines on the DUT. 


SAVPRI - Saved processor priority. 
SAVTEN - Bit map of TX.ENBL bits (Bit setif TX.ENBL was set). 


3* 

3# CALLING SEQUENCE: JSR 
3% 

3* COMMENTS: 
* 


; 
s# SUBORDINATE ROUTINES CALLED: TXDSBL. 
 Halialllachathatachacncethtaaceecahtneeetten tht LLL LLL LLL LLL TTT TTT TTT TTT er TTT ttt 


JSR 
SAVPRI 
@PRIOS 
@MAPLNS,RS 
PC, TXDSBL 
RS,SAVTEN 


JSR 
PC 





PC, TXROFF 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 

sGET THE PRESENT PROCESSOR PRIORITY. 

sDISABLE DUT INTERRUPTS. 

sPREPARE TO DISABLE TX ON ALL DUT LINES. 

sCLEAR ALL DUT TX.ENABLE BITS. 

sPRESERVE THE PREVIOUS TX.ENABLE BIT STATES. 
sRESTORE GPRS. 

PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 















SEQ 0175 
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GLOBAL SUBROUTINE - TXRON - 













SEQ 0176 


6749 -SBTTL GLOBAL SUBROUTINE - TXRON - 
6750 b¢¢ SRRRRESEEEEEEEEEOEEEEEEE EE EEEE DEDEDE ODED OO 40400000 0000000000400000000000008 
6751 3% - Turn TX and RX on Routine - 
6752 3% This subroutine is used to turn on DUT transmission and reception. 
6753 3% This routine restores the DUT TX.ENABLE bits and the processor priority 
$n 3% to the states saved by the TXROFF routine. 
6 3* 
6756 ;* INPUTS: SAVPRI - Saved processor priority. 
pte 14 7% SAVTEN - Bit map of TX.ENBL bits (Bit setif TX.ENBL was set). 
,* 
6759 3;# OUTPUTS: DUT TX.ENABLE bits - Set to specified states. 
ta 3* PROCESSOR PRIORITY - Set to specified priority. 
1 ;* 
6762 3# CALLING SEQUENCE: JSR PC, TXRON 
6763 3* 
6764 ;* COMMENTS: 
6765 3% 
6766 3# SUBORDINATE ROUTINES CALLED: TXENBL. 
6767 i-- SOORREEEREEE EE EE EEE EEE EE EEE EOE kkk kkk kk ee ees 
6768 
6769 037130 TXRON:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
037130 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
6770 027134 013705 002404 MOV SAVTEN,RS sGET THE SAVED STATES OF THE TX.ENABLE BITS. 
6771 037140 004737 036446 JSR PC, TXENBL sSET THE SPECIFIED TX.ENABLE BITS. 
6772 037144 106437 002406 MTPS SAVPRI sRESTORE THE PROCESSOR PRIORITY. 
6773 037150 60$: PASS sRESTORE GPRS. 
037150 004736 JSR PC ,AC(SP)+ sRETURN TO PREGOS SUBRT. 
6774 037152 000207 RTS PC 
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GLOBAL SUBROUTINE 


6776 
6777 
6778 
6779 
6780 
6781 
6782 
6783 
6784 
6785 
6786 
6787 
6788 
6789 
6790 


r-— 


037154 
037154 
037160 
037162 
037166 
037172 
037176 
037202 
037206 
037212 
037216 
037222 


037226 
037230 
037230 
037232 


004537 
006003 
013704 
013705 
004737 
005237 
004737 
005237 
004737 
004737 
010437 


006103 


004736 
000207 























SEQ 0177 

- TXRREP - 

-S8TTL GLOBAL SUBROUTINE - TXRREP - 

SO SEREEEEEDEEEEEEEEE 6S 6468040444 O0000606 0606 060804060000 000004 000000 EE EE EOS 

16 - Report Final TX/RX Errors Routine - 

3* This subroutine reports errors which are found after the completion 

;* of the TX, RX, and verification of data patterns. It reports errors 

3% dealing with incomplete TX or RX and with DMA_START bits. 

3* 

;* INPUTS: ACTLNS - Bit map of active DUT lines. 

:* DPLENB - Label at base of the data pattern lengths tabie. 

3% ERRMSG - Address of primary error message for this routine. 

3% ERRNBR - Error number of error reported in this routine. 

3% RXCNTB - Label at base of the RX character counters table. 

:8 RXDONF - Reception done flags. 

3% TXCNTB - Label at base of the TX character counters table. 

3% TXDONF - Transmission done flags. 

:* TXINTF - Contains bit map of lines with DMA_START bit errors. 

3* 

3# OUTPUTS: CARRY FLAG - Restored to its entering value. 

;* ERRBLK - Address of the error reporting routine (Destroyed). 

i* Messages may be printed at the operator corsole. 

3* 

3* CALLING SEQUENCE: JSR PC, TXRREP- 

3* 

3* COMMENTS: This routine reports errors at Initial ERRNBR thru 

7% Initial ERRMBR+2. 

3* If no lines failed to complete their reception or failed to 

3* complete their transmission or had DMA_START bit errors 

3* then no messages are printed. 


7% 
;* SUBORDINATE ROUTINES CALLED: CONMAP ,ER9005,ER9102,RDMAST,RRXNON,RTXNON. 
i-- SEREEEREREEEEASEAAAAREREEEAAARESESASAEREREAAEEAEEAEEAREAREREERALALALRLEREES 


TXRREP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
ROR R3 sROTATE CARRY INTO GPR TO SAVE CARRY STATE. 
MOV ERRNBR ,R4 sSAVE THE INITIAL ERROR NUMBER VALUE. 
MOV ACTLNS,RS sGET THE ACTIVE LINES BIT MAP. 
JSR PC ,ROMAST sREPORT ANY DMA_START BIT ERRORS. 
INC ERRNBR sSELECT INTIAL ERROR NUMBER + 1. 
JSR PC ,RTXNON sREPORT TX NOT COMPLETE IF NECESSARY. 
INC ERRNBR sSELECT INITIAL ERROR NUMBER + 2. 
JSR PC ,CONMAP sGENERATE AN ASSOCIATED LINE BIT MAP. 
JSR PC ,RRXNON sREPORT RX NOT COMPLETE IF NECESSARY. 
MOV R4,ERRNBR sRESTORE THE INITIAL ERROR NUMBER VALUE. 
ROL R3 sROTATE SAVED CARRY STATE BACK INTO CARRY. 
60$: PASS sRESTORE GPRS, THIS ROUTINE PRESERVES THE 
JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC ; INITIAL CARRY STATE. 
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SEQ 0178 
GLOBAL SUBROUTINE - UNSDIV - 
6824 -SBTTL GLOBAL SUBROUTINE - UNSDIV - 
6825 i++ SERRSOEEERED ESOS OO 664044000440 404EEE NEES EEEEEDREEEREEEREEEEEEEEEES. © + 44508 
6826 3% - Unsigned Divide Routine - 
6827 3% This subroutine is used to divide a 32 bit unsigned dividend by a 
6828 3* 16 bit unsigned divisor giving a 16 bit quotient. All numbers are 
6829 3* considered to be unsigned. A success flag is not set on return if 
oat 3% the quotient was too big to be contained in 16 bits. 
6831 3* 
6832 ;* INPUTS: Rl - The divisor, unsigned, 16 bits. 
6833 3* R2 - Most significant word of the dividend, unsigned, 16 bits. 
cee i* R3 - Least significant word of the dividend, unsigned, 16 bits. 
3* 
6836 3* OUTPUTS: Ri - Quotient, unsigned, 16 bits (177777 if overflow). 
pel 3% CARRY - Success flag, set if complete quotient fits in 16 bits. 
;* 
6839 3* CALLING SEQUENCE: JSR PC,UNSDIV 
6840 i* 
6841 3* COMMENTS: If the divisor is 0 the quotient is returned as all ones 
see ;* (177777) and the carry is clear regardless of the dividend. 
;* 
6844 3* SUBORDINATE ROUTINES CALLED: None. 
6845 Belial acachacecaatechthtahtahtehehhe thet LLL LL LLL LILI LiL T TTT TTT TTT TTT TTT rT TTT tt 
6846 
6847 037234 UNSDIV:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
as 037234 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
6 i+ 
oon ; Check for quotient greater than 16 bits condition. 
68 ,* 
6851 037240 010204 MOV R2,R4 sGET MSW OF DIVIDEND FOR SUBTRACT. 
6852 037242 160104 SUB R1,R4 sSUBTRACT DIVISOR FROM MSW OF DIVIDEND. 
6853 037244 103403 BCS 2s sIF IT DION'T GO, WE HAVE QUOTIENT < 16 BITS. 
6854 037246 012701 177777 MOV #-1,R1 sSET QUOTIENT TO ALL ONES (177777), 
re 037252 000442 BR 60$ sEXIT WITH CARRY CLEAR. 
6856 i+ 
odd ; Set up counters and various working GPRs. 
68 3° 
6859 037254 005004 2s: CLR R4 s;CLEAR THE LSW OF THE DIVISOR. 
6860 037256 000241 CLE sCLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 
6861 037260 006001 ROR Ri ; DIVISOR BY 
6862 037262 006004 ROR R4 ; 2CUNSIGNED ) 
et 037264 012700 000020 MOV #16. ,RO sSET UP INITIAL SHIFT COUNT TO 16. 
6864 i+ 
6865 ; The subtract and shift loop. 
6866 $- 
6867 037270 010246 4$: MOV R2,-(SP) sSAVE MSWORD OF DIVIDEND. 
6868 037272 010346 MOV R3,-CSP) sSAVE LSWORD OF DIVIDEND. 
6869 037274 160403 SUB R4,R3 sLSWORD DIVIDEND - LSWORD OF DIVISOR. 
6870 037276 005602 SBC R2 sMSWORD DIVIDEND - BORROW . 
6871 037300 103402 BCS 6$ sIF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 
6872 037302 ‘60102 SUB R1,R2 sMSWORD DIVIDEND - MSWORD OF DIVISOR. 
aote 037304 14 )3003 BCC 8$ sIF NO BORROW, IT WENT, CARRY IS CLEAR. 
68 36 
6875 ; It didn't go, so we shift a 1 into the quotient (complemented later). 
6876 ; Carry is set. 
6877 ‘- 
6878 037306 012603 6$: MOV (SP)+,R3 sRESTORE LSWORD OF DIVIDEND. 
6879 037310 012602 MOV (SP)+,R2 sRESTORE MSWORD OF DIVIDEND. 


r-— 
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- UNSOIV - 





GLOBAL SUBROUTINE 
6880 037312 000401 


— 


037314 


037316 
037320 
037322 
037324 
037326 
037330 
037332 


037334 
037336 
037340 
037342 
037344 


037346 
037350 
037352 


037354 
037356 


037360 
037360 
037364 


037366 


012626 


006105 
000241 
006001 
006004 
005300 
001357 
005105 


000241 
006103 
103402 
160403 
103403 


005205 
001001 
005305 


010501 
000261 


010166 
004736 


000207 


000004 





10$ 


sGOTO SHIFT 1 INTO THE QUOTIENT. 


7° 
; It went, so we restore the stack and shift a 0 into quotient (will be 
; complemented later). 


ied 
8$: MOV 


10$: ROL 


3¢ 


3? 

F} Round up, 

i2$: INC 
BNE 
DEC 

; All done, 


14$: MOV 
SEC 


60$: PASS 


RTS 


the 


; Now we either 


(SP)+,(SP)+ 


Carry is clear. 


sPOP THE SAVED DIVIDEND OFF OF THE STACK. 


result of the subtract attempt into the quotient shift reg. 


RS 


sSHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
sDIVIDE THE 

; DEVISOR BY 

;_ 2 CUNSIGNED). 

sCOUNT THIS SHIFT AND SUBTRACT. 

sLOOP FOR ANOTHER SHIFT & SUB IF NOT DONE. 
sGET QUOTIENT FROM INVERTED QUOTIENT. 


round up or leave quotient alone. 


R3 
12$ 
R4,R3 
14$ 


extra subtract went. 


RS 
14$ 
RS 


RS,R1 


R1 
MOV 
JSR 


PC 


sCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
sMULTIPLY LSWORD OF agg 2, MSWORD IS 0. 


sIF CARRY FROM SHIFT, ROUND UP. 
sSUBTRACT DIVISOR FROM DIVIDEND. 
sIF BORROW, DON’T ROUND UP. 


sINCREMENT THE QUOTIENT BY ONE. 
sIF NO OVERFLOW, WE LEAVE THE ROUND UP. 
;DON'T LET ROUNDING CAUSE OVERFLOW. 


pass quotient and exit. 


sPASS QUOTIENT BACK IN R1. 
sINDICATE NO OVERFLOW. 


sRESTORE GPRS, LEAVE THE FOLLOWING INTACT: 
R1,R1ISLOTC( SP) sPUT Ri IN STACK SLOT. 
PC ,@(SP)+ 
sR1_ - 16 BIT, UNSIGNED QUOTIENT, 
sCARRY - SET INDICATES NO OVERFLOW (SUCCESS). 


sRETURN TO PREGOS SUBRT. 

















SEQ 0179 
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- UPOCHR - 





GLOBAL SUBROUTINE 


—— 


6920 
6921 
6922 
6923 
6924 
6925 
6926 
6927 
6928 
6929 
6930 
6931 
6932 
6933 
6934 
6935 
6936 
6937 
6938 
6939 
6940 
6941 
6942 
6943 


037370 
037370 
037374 


037400 
037404 
037406 
037412 
037414 
037420 


037424 
037430 
037432 
037434 
037449 


037444 
037450 
037452 


004537 
016302 


016301 
005201 
020162 
103402 
166201 
010163 


016301 


010163 


016204 
020104 
103403 


005474 
005364 


003552 
003312 


003352 
003552 


003712 


177777 
003712 


003612 





SEQ 0180 


-SBTTL GLOBAL SUBROUTINE - UPOCHR - 

ioe OO066606606086440066606000000000060660000006000000060400000000000600000000008 
34 - Updete Character Pointers and Counters Routine - 

34 This subroutine updates the pointers and counters associated with 

34 the reception of a character on e specified line. The receive char 

34 pointer is set to the next expected character, the receive char count 
3% ie incremented, and the count is checked to determine if the reception 
;* is complete. If the reception is complete the Reception Done Flag 

3% is set for the specified line. 

3* 

3;@ INPUTS: R3_- Line number times 2 of line on which cher was received. 
34 BITTBL - Label of table of words used to form single bit maps. 
34 CHCNTB - Base of number of chars to TX on each line table. 

34 DPENDB - Base of date pattern end addresses table. 

34 DPLENB - Base of date pattern lengths table. 

34 RXCNTB - Base of the RX character counters table. 

74 RXPTRB - Base of the RX cheracter pointers table. 

34 TXRXLB - Base of TX/RX line number association table. 


3% 
s# OUTPUTS: Following variables updated for line on which char wes received: 


3% RXCNT - Count of the number of characters received on line. 
34 RXDONF - RX done flags with BITO for line 0 ... (Updated). 
34 RXPTR - Updated to point to the next expected cher on line. 
34 

3# CALLING SEQUENCE: JSR PC ,UPDCHR 

3% 

3# COMMENTS: 


4 
3# SUBORDINATE RO!iINES CALLED: None. 
3-- $2466666666646080600060006 66 0600000000460006060606000000000060600066000600006 
UPDCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV TARXLBCR3) ,R2 sGET TX LINE NUMBER OFFSET FOR THIS RX LINE. 


3 
; Update the RX date pointer with wraparound at the end of the date pattern. 


MOV RXPTRBC(R3),R1 ;GET THE RX DATA POINTER FROM THE RX PTR TABLE. 
INC R1 sINCREMENT THE RX POINTER VALUE BY 1. 
CMP R1,DPENDB(R2)  ;CMP RX PTR VALUE WITH ADR OF END OF DATA PAT. 
es sSKIP WRAPPING RX PTR AROUND IF NOT AT END. 
SUB DPLENB(R2),R1 ;WRAP RX PTR AROUND TO START OF DATA PATTERN. 
2s: MOV R1,RXPTRBCR3) ;UPDATE THE RX POINTER WITH THE NEW VALUE. 
3° 


; Update the RX character count with overflow detection. 

ie 

MOV SOC RS) a ;GET THE RX CHARACTER COUNT. 
1 


INC sINCREMENT THE RX CHAR COUNT VALUE BY 1. 
BNE ae sSKIP SETTING COUNT TO MAX IF NO OVERFLOW. 
MOV @-1,R1 sSET RX CHAR COUNT VALUE TO MAX VALUE. 

43: MOV R1,RXCNTBCR3)  ;UPDATE THE RX CHAR COUNT WITH NEW VALUE. 


3¢ 
; Check for RX completion on this line. 
; If RX is complete on this line, set the correct RX done flag. 


ge 
MOV CHCNTB(R2),R4 ;GET THE NUMBER OF TX CHARS IN COMPLETE Tx. 
CMP R1,R4 sCOMPARE RX CHAR COUNT WITH NUMBER OF TX CHARS. 
BLO 60$ sEXIT ROUTINE IF NOT ALL CHARS RECEIVED. 
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GLOBAL SUBROUTINE 


6976 037454 
6977 
6978 037462 


037462 
6979 037464 


056337 002534 


004736 
000207 


- UPOCHR - 
002654 BIS 
60$: PASS 
RTS 


BITTBLCR3) ,.RXDONF 


PC 


JSR 


sRESTORE GPRS. 
PC ,@(SP)+ 


sSET THE RX DONE FLAG FOR THIS LINE. 


sRETURN TO PREGOS SUBRT. 


SEQ 0181 
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SEQ 0182 
GLOBAL SUBROUTINE - VANSUP - 
6981 -SBTTL GLOBAL SUBROUTINE - VANSUP - 
6982 b¢+ S0O0O060060006 666060060000 6000000000000000060000000000000000000000000000000 
toe 34 - TRANSMISSION / RECEPTION SET-UP ROUTINE - 
6 3% 
6985 3% This routine is used to initielise both the DUT end the 
6986 3% transmission/reception control perameters to the correct 
6987 3% state, prior to a Single character or DMA traenmission, 
6988 34 reception test. 
6989 $ 
6990 3* INPUTS Ri - TX, RX LPR contents. 
6991 3% R2 - Stert address of date pattern to transmit. 
6992 3% R3 - Length of date pattern. 
6993 3% R4 - Number of patterns to trensmit. 
6994 3% ACTLNS - Contains e bit map of all currently active lines. 
6995 3% LOPBCK - Contains the type of loopbeck mode selected. 
te pe CBB - Lebel at bese of TX/RX control block. 
3% 
6998 3* OUTPUTS: The contents of the TX/RX control block (CCB) ere destroyed. 
6999 3% The indirect address field of the DUT CSR may be destroyed. 
7000 3% The DUT's LPR's and LNC’s may be modified. 
7001 3% The following fo dy ay and counters ere initialised; 
7002 3% CHCNT, CHRTOT ,DPEND ,OPLEN,EXCNT ,RXCNT ,,RXPTR,TXCNT, 
7003 3% TXPTR, TXRXL. 
roeg 3% CHRTOT, RXDONF, TXDONF and TXINTF ere cleered. 
3% 
aoe 3# CALLING SEQUENCE: JSR PC, VANSUP 
3% 
7008 3* COMMENTS: Modem loopback mode is inhibited if it hes been selected 
7009 34 vie Hardware P-table questions, and internal loopback mode 
7010 34 is forced to take place. 
7011 se 
7012 3% 
7013 s# SUBORDINATE ROUTINES CALLED: CONMAP,RXENBL, TXRINI. 
7014 b> > S66606600000666600000000000000000000000000000000000000000000000000000008008 
7015 
7016 037466 VANSUP:: SAVE sSAVE CONTENTS OF THE GPR’'S RO THRU RS. 
037466 004537 005474 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
7017 037472 005037 002646 CLR CHRTOT sCLEAR TOTAL RECEIVED CHAR COUNTER. 
7018 037476 005037 002420 CLR TXINTF sCLEAR FLAGS USED TO LOG DMA H.OVER ERRORS. 
7019 037502 005037 002652 CLR TXDONF sCLEAR THE TX DONE FLAGS. 
— 037506 005037 002654 CLR RXDONF sCLEAR THE RX DONE FLAGS. 
3¢ 
rose s Set up the Trensmission/Reception Control block to the desired state. 
g° 
7024 037512 010137 003272 MOV R1,CBB sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 
7025 037516 012701 003272 MOV @CBB ,,R1 sGET BASE ADDRESS OF CONTROL BLOCK. 
7026 037522 005201 INC Ri sINCREMENT ADDRESS FOR NEXT WORD 
7027 037524 005201 INC R1 sINITIALISE THE FOLLOWING IN THE CNTRL.BLK: 
7028 037526 012721 000004 MOV @4,(R1)> s LNCTRL PARAMETER, ENABLE RECEIVERS. 
7029 037532 010221 MoV R2,CR1)o s START ADDRESS OF DATA PATTERN. 
7030 037534 010321 mov R3,CRI)+ s DATA PATTERN LENGTH. 
7031 037536 010421 MoV R4.CR1)> s NUMBER OF DATA PATTERNS TO TRANSMIT. 
7032 037540 013721 002272 MOV ACTLNS .CR1)> s BIT MAP OF LINES TO INITIALISE. 
7033 037544 032737 000004 002274 BIT @6IT2,LOPBCK sTEST IF MODEM LOOPBACK MODE WAS BEEN SELECTED. 
7034 O375S2 001404 BEQ 2s sDONT SELECT INTERML LOPOCK IF STAGRO OR LOCAL. 
7035 037554 012702 000001 ROW #1,R2 sFORCE INTERNAL LOOPBACK MODE TO BE SELECTED. 
7036 037560 110221 MOVB R2.(R1)> sINITIALISE LOOPBACK MODE IN CONTROL BLOCK. 
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GLOBAL SUBROUTINE 


7037 
7038 


037562 
037564 


7039 037570 


7040 


037572 


0 
037662 


000402 
113721 


005201 
012711 


004737 


012701 
013702 
005101 
005102 
040102 
010237 
005037 
004737 


012705 
004737 


013705 
004737 
004737 


004736 
000207 


002274 





2s: 
43: 


3° 


BR 
MOVB 
INC 
MOV 


ay 
LOPBCK ,(R1)+ 
R1 


@2,(R1) 


sSKIP NEXT INSTRUCTION IF IN MODEM LOOPBACK. 
sSET LOOPBACK MODE. 

sINCREMENT ADDRESS FOR THE NEXT WORD. 

sSET AMOUNT OF OFFSET EACH TX STARTS AT TO 2. 


s Initialise the DUT and the associated pointers end counters, to the state 
s dictated by the contents of the TX/RX control block. 


3° 


JSR 


PC, TXRINI 


sINITIALISE OUT. 


; Initialise pointers and counters for inactive lines to zero. 


° 


@MAPLNS,R1 
ACTLNS ,R2 


CBP 
PC, TXRINI 


3 
; Disable Receivers on all lines 


; lines thet are selected. 


MOV 
JSR 


@MAPLNS ,RS 
PC ,RXDSBL 


sGET THE LINE BIT MAP FOR ALL LINES. 
sGET THE ACTIVE LINE BIT MAP. 
; 


i 

sGENERATE AN IN-ACTIVE LINE BIT MAP. 
sMOVE BIT MAP TO THE CONTROL BLOCK. 
sCLEAR THE REPEAT TX COUNT IN CNTRL BLCK. 
sSET UP PARAMETERS FOR INACTIVE LINES. 


to ensure correct initialisation of only the 


sSET-UP BIT MAP FOR ALL LINES. 
sDISABLE RX ON ALL LINES. 


3° 
; Enable receivers on associated (RX) lines. 


MOV 
JSR 
JSR 
PASS 


RTS 


ACTLNS ,RS 
PC ,CONMAP 
PC ,RXENBL 


JSR 
PC 


sGET THE ACTIVE LINE BIT MAP. 

sGENERATE AN ASSOCIATED LINE BIT MAP. 

sENABLE RECEIVERS ON ASSOCIATED LINES. 

sRESTORE GPR‘S. 

PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
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GLOBAL SUBROUTINE 


—— 


7072 
7073 


7115 
7116 


037664 
037664 
037670 
037672 
037674 
037700 
037704 
037706 
037710 
037712 
037714 
037720 
037722 


037726 
037730 
037730 
037734 


037736 


005474 


170000 
007777 


002534 
031726 


000006 





-SBTTL GLOBAL SUBROUTINE 


gee SROCEEEEEESEEEEESEERESAEESEEERSEEEAEEDAEREEEEEEESEE EE SEEAEEEEEEOEEEEEEEEDSE 


- WAIBIC - 


3¢ - Weit For Bit Clear Routine - 

3¢ This subroutine waits for the specified bit to become clear. If the 
34 specified bit goes to a clear state within the specified time-out 

34 period a success indication is returned by this routine. 

34 The lest value which is read looking for the condition is returned to 
34 allow the use of this routine to look for destructive read conditions. 
34 

3@ INPUTS: Rl - Time-out value and bit number indication: 

34 Bits 15 thru 12 - Number of bit to test Crange 0 thru 15). 
34 Bits 11 thru 0 - Time-out value in milli-seconds (4095 max). 
34 R2 - Address of word containing the bit to test. 

34 MSLCNT. 

34 

3# OUTPUTS: R2 - The lest word which was read to check for the condition. 
34 CARRY - Success flag (CARRY set if bit clr before time-out). 
3* 


s# CALLING SEQUENCE: 


3* COMMENTS: 


MOV 


MOV 
JSR 


#130040,R1 


LABEL ,R2 
PC ,WAIBIC 


ae 
3# SUBORDINATE ROUTINES CALLED: MSLGET. 
t-- 00666606 06666600660000666060666604606606666660006666046460004066 6640400644448 684 


sSAVE CONTENTS OF GPRS RO THRU RS. 


WAIBIC:: SAVE 


60$: 


RTS 


JSR 
R2,R4 
R1,R2 
#170000,R1 
#7777,R2 
R2 
R2 
Re 
R2 
BITTBL(R2),R2 
R3 
PC ,MSLGET 
RO,R2 
R2 
MOV 
JSR 
PC 


RS ,PREGOS 


sPASS BIT 11 (13 OCTAL) AND 

+ 32 (40 OCTAL) MS DELAY. 
sTEST BIT IN WORD AT “LABEL”. 
sWAIT 32 MS FOR BIT 11 TO CLR. 


sCALL REGISTER SAVE SUBRT. 


sSET UP THE ADDRESS PARAMETER FOR MSLGET. 


sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
sSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
sPUT LINE NUMBER FIELD IN LSBYTE. 

sSHIFT THE LINE NUMBER FIELD INTO THE PROPER 
; POSITION TO USE IT AS A WORD TABLE OFFSET 
;_ FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
;GET BIT MAP OF LINE TO TEST FROM TABLE. 
sINDICATE THAT THE BIT SHOULD BE CLR. 

sWAIT FOR THE BIT TO BE CLR WITHIN TIME-OUT. 
;_ CARRY IS CORRECT UPON MSLGET RETURN. 
sPASS LAST VALUE READ AS OUTPUT PARAMETER. 
sRESTORE GPRS, EXCEPT THE FOLLOWING: 


R2 ,R2SLOT( SP) 
PC,9(SP)+ 


sPUT R2 IN STACK SLOT. 


sRETURN TO PREGOS SUBRT. 


; R2 - LAST VALUE READ LOOKING FOR CONDITION. 
s CARRY - SUCCESS FLAG (SET IF BIT FOUND CLR). 





SEQ 0184 
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7118 
7119 


—— 


037740 
037740 
037744 
037746 
037750 
037754 
037760 
037762 
037764 
037766 
037770 
037774 
037776 


040002 
040004 
040004 
040010 


040012 


005474 


170000 
007777 


002534 
031726 


000006 


- WAIBIS - 


-SBTTL GLOBAL SUBROUTINE 


tee SOEEAEEEEEEEEEEEEEEEEEDE ESO EEEEEEEDEEEEEDEEEEODDEEDOEDEEEEEEDEDDEEOEEEEEES 


- WAIBIS - 


34 - Wait For Bit Set Routine - 

34 This subroutine waits for the specified bit to become set. If the 

34 specified bit goes to a set state within the specified time-out 

34 period a success indication is returned by this routine. 

34 The last value which is read looking for the condition is returned to 
34 @llow the use of this routine to look for destructive read conditions. 
34 

3@ INPUTS: Ril - Time-out value and bit number indication: 

:* Bits 15 thru 12 - Number of bit to test (range 0 thru 15). 
34 Bits 11 thru 0 - Time-out value in milli-seconds (4095 max). 
34 R2 - Address of word containing the bit to test. 

pe MSLCNT. 

3% 

3# OUTPUTS: R2 - The last word which was read to check for the condition. 
34 CARRY - Success flag (CARRY set if bit set before time-out). 
34 


s# CALLING SEQUENCE: MOV 


3# COMMENTS: 


MOV 
JSR 


#130040,R1 sPASS BIT 11 (13 OCTAL) AND 

+ 32 (40 OCTAL) MS DELAY. 
LABEL ,R2 sTEST BIT IN WORD AT “LABEL”. 
PC ,WAIBIS sWAIT 32 MS FOR BIT 11 TO SET. 


* 
3* SUBORDINATE ROUTINES CALLED: MSLGET. 


i-- PERERA EAEESESSSASESESEAE EE EESERAEEAAAAAAEAAAASESEDAAAREEAREREREREREREDEEEEE 


WAIBIS:: SAVE 


60$: PASS 


JSR 
R2,R4 
R1,R2 
#170000,R1 
#7777,R2 
R2 
R2 
Re 
R2 
BITTBL(R2),R2 
R2,R3 
PC ,MSLGET 
RO,R2 
R2 
MOV 
JSR 
PC 





sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sSET UP THE ADDRESS PARAMETER FOR MSLGET. 


sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
sSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
sPUT LINE NUMBER FIELD IN LSBYTE. 

sSHIFT THE LINE NUMBER FIELD INTO THE PROPER 

; POSITION TO USE IT AS A WORD TABLE OFFSET 

;_ FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
sGET BIT MAP OF LINE TO TEST FROM TABLE. 
sINDICATE THAT THE BIT SHOULD BE SET. 

sWAIT FOR THE BIT TO BE SET WITHIN TIME-OUT. 

;_ CARRY IS CORRECT UPON MSLGET RETURN. 

sPASS LAST VALUE READ AS OUTPUT PARAMETER. 
sRESTORE GPRS, EXCEPT THE FOLLOWING: 
R2,R2SLOTC( SP) sPUT R2 IN STACK SLOT. 
PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
s R2 - LAST VALUE READ LOOKING FOR CONDITION. 
; CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 





SEQ 0185 
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SEQ 0186 


7164 -SBTTL GLOBAL SUBROUTINE - WAITTX - 
7165 b+ SHORES EEEEEEEEOEEE ODODE EEE ODODE OE OS OO OEE OE OEO8 4046 400006000000000060008 
7166 74 - WAIT FOR TX TO FINISH - 
7167 34 This subroutine is used in the FIHAVL.TST. 
7168 3% It waits for transmission to complete ie TX_ACTION. Then delays 
7169 34 for 5 milliseconds to allow time for the last character to get into 
7170 3% the fifo. 
7171 34 
bs 3* INPUTS: CSRA - Contains the address of the CSR. 
3% 
i ha 3# OUTPUTS: Carry - Set indicates success. 
1 3* 
7176 3# CALLING SEQUENCE: JSR PC ,WAITTX 
7177 3* 
7178 3* COMMENTS: 
7179 3* 
7180 3* SUBORDINATE ROUTINES CALLED: DELAY,WAIBIS. 
7181 b-- SORRERREDEEAEEEE EE EEEEEEEEEEED EE OEEE DEEDS OE OE EEE EE OOOO OE OE EEEE EEE EE RE RES 
7182 
7183 040014 WAITTX:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
040014 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
7184 040020 012701 170536 MOV #170536,R1 sPASS TIME-OUT VALUE OF 350 MILLI SECS. 
7185 040024 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
7186 040030 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
7187 040034 103005 BCC 60$ sBRANCH IF FIFO EMPTY, ABORT THE TEST. 
7188 040036 012704 000005 MOV #5,R4 sPASS DELAY OF 5 MILLI SECS. 
7189 040042 004737 030370 JSR PC ,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
Le 040046 000261 SEC sSET CARRY TO I8NDICATE SUCCESS. 
191 
7192 040050 60$: PASS s;RESTORE GPRS. 
040050 004736 JSR PC ,8(SP)+ ;RETURN TO PREGOS SUBRT. 
7193 sPASS THE CARRY BIT, SET INDICATES SUCCESS. 
7194 040052 000207 RTS PC 


-— 
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-— 


040054 
040054 


040060 


040062 
040064 
040070 
040072 
040100 
040102 


004537 


005005 


010204 
010577 
006305 
036537 
001451 
012701 


005474 


142210 
002534 
000004 





- WOPOR - 


002272 


-SBTTL GLOBAL SUBROUTINE - WOPDR - 

5 O+ SHORRESEEEEEEEEEEEEEEEEEEEEEDEEE DEES ODODE OOO600000000000000000000000008008 
34 - Write Data Pattern to Device Registers - 

3% This routine writes a rotated data pattern to each of the 6 device 

34 registers of each active line of the device under test. 

34 The date pattern is rotated once after each write to a device register 
3% on a particular line. The starting date pattern for each line 
34 is rotated once after ly all the registers on a particular 
34 line. This leads to the following data pattern: 

5% Line 0, register 0 - shifted 0 bit positions 

34 Line 0, register 1 - shifted 1 bit position 

;* eee 

;4 Line 1, register 0 - shifted 1 bit position 

;* Line 2, register 1 - shifted 2 bit positions 

3* ee 

38 Any bits fields in the device registers that cannot be altered 

3% are masked out of the data pattern before it is written. 

34 This routine will use either MOV, MOVB, BIS, BISB, BIC, or BICB 

3% instructions. The upper or lower byte can be specified for writing. 

7* 

3# INPUTS: R2 - Used to pass in the data pattern to be rotated & written. 
34 R3 - Byte indicator (- => lo byte, + => hi byte, 0 => both). 

3* R4 - Operation type indicator (- => BIC, + => BIS, 0 => MOV). 
34 ACTLNS - Bit map of the active lines on the device under test. 
3* CSRA - Contains the CSR address of the Device under test. 

3% DRADRT - Base address of device register address table. 

7* LPRO - Equated to LPR reg offset from device CSR address. 

3* NUMLNS - Number of lines on the device under test. 

34 TXBFCO - Equated to TBUFFCT reg offset from device CSR address. 
34 UNBTTB - Base address of the unused bit table. 


3% 

3* OUTPUTS: 
3% 

+* CALLING SEQUENCE: JSR PC ,WOPOR 
7* 

:* COMMENTS: 


;* 
* 


Device registers on all active device lines are modified. 


This routine does not write any data to the TX.CHAR registers. 
The CSR is cleared except for the IND.ADR.REG field. 


; 
;* SUBORDINATE ROUTINES CALLED: ROLDAP. 


t-- SECEEEEEEREERESEAEEASAEEEEEASSEEESEAEASASSAEEAREEEEAEALAEEESALERLEAREDEEEES 


WOPODR: : 
3+ 


3* 


SAVE 


CLR 


sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


; Set up outer loop which writes the data pattern to each line's registers 


RS sCLEAR LINE COUNTER TO SELECT LINE 0. 


; The outer loop follows. Each pass through this loop writes data to all of 
; the device registers for a particular line if it is active. 


23: 





R2,R4 sSAVE THE OUTER LOOP DATA PATTERN. 

RS ,@CSRA sSET CSR IND.AOR.REG FIELD TO THIS LINE. 
RS ;TURN LINE NUMBER INTO A WORD OFFSET. 
BITTBLCRS),ACTLNS 

20$ sLINE ACTIVE? NO, SKIP THIS LINE. 
#LPRO,R1 sYES, INITIALIZE THE REGISTER OFFSET. 





SEQ 0187 
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-— 


002320 
002300 
000010 


000010 


000012 


000012 


034642 
000002 
000016 


034642 


000010 





- WOPOR - 


6$: 


10$: 


12$: 


14$: 
16$: 


18$: 


3? 


60$: 
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The inner loop follows. 


device register. 


R2,RO 
UNBTTBCR1),RO 
DRADRT(R1),R3 
R3SLOT(SP) 

6$ 

R3 

RO 

R3SLOT(SP) 
12$ 


Each pass through this loop writes data to a 


sCLEAR BIT FIELDS FOR UNUSED REGISTER BITS. 
sGET THE ADDRESS OF THE DEVICE REGISTER. 
sCHECK THE OPERAND TYPE INDICATOR. 


sHIGH BYTE? NO, SKIP HIGH BYTE ADDRESS SET UP. 


sYES, SET THE REG ADDRESS TO THE HIGH BYTE. 
sMOVE HIGH BYTE DATA INTO THE LOW BYTE. 
sCHECK THE OPERAND TYPE INDICATOR. 

sWORD ACCESS? YES, GO PERFORM WORD ACCESS. 


3* 
sPerform byte access to the specified byte of the specified register. 


3+ 


R4SLOT(SP) 
8$ 


sNO, CHECK THE ACCESS TYPE INDICATOR. 

sUSE BIC? YES, GO PERFORM BICB INSTRUCTION. 
sUSE MOV? YES, GO PERFORM MOVB INSTRUCTION. 
sNEITHER. PERFORM BISB ACCESS TO REGISTER. 


sPERFORM BICB ACCESS TO REGISTER. 
sPERFORM MOVB ACCESS TO REGISTER. 


sPerform word access to the specified register. 


B 
MOV 


i* 


R4SLOT(SP) 
14$ 


3 
RO,CR3) 


PC ,ROLDAP 
#2,R1 
R1,#TXBFCO 
4$ 

outer loop. 
R4,R2 


PC ,ROLDAP 
RS 
RS 
RS, @NUMLNS 
2$ 


JSR 
PC 


Now set up for next line. 


sCHECK THE 
sUSE BIC? 


ACCESS TYPE INDICATOR. 

YES, GO PERFORM BIC INSTRUCTION. 
sUSE MOV? YES, GO PERFORM MOV INSTRUCTION. 
sNEITHER. PERFORM BIS ACCESS TO REGISTER. 


sPERFORM BIC ACCESS TO REGISTER. 
sPERFORM MOV ACCESS TO REGISTER. 


; Prepare the data pattern and offset for the next register on this line. 


sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
sINCREMENT OFFSET FOR NEXT REGISTER. 

sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
;LOOP IF NOT ALL REG DONE FOR THIS LINE. 


Loop if not done. 


sSET UP TO ROTATE THE DATA PATTERN. 

sROTATE THE DATA PATTERN. 

sCONVERT BACK TO LINE NUMBER FROM WORD OFFSET. 
sCOUNT THIS LINE. 

sCOMPARE LINE COUNT WITH NUMBER OF LINES. 
sLOOP IF SOME LINES NOT DONE. 


sRESTORE GPRS. 
PC,@(SP)-+ 


sRETURN TO PREGOS SUBRT. 





SEQ 0188 
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SEQ 0189 
GLOBAL SUBROUTINE - WIWLNC - 
7308 -SBTTL GLOBAL SUBROUTINE - WTWLNC - 
7309 b¢+ SHROSOEEEEEEED EE EE OE 6E66 006404 06600000 06 0600000000 0406000000000000000000008 
7310 34 - Line Control Register Setup Routine - 
7311 34 This subroutine is used to set the Device Under Test (DUT) Line 
7312 34 Control Registers (LNCTRL) to the specified state. Only tne LNCTRLS 
7313 3% for the specified lines are altered. 
7314 i* 
7315 ;* INPUTS: RO - New line parameters. 
7316 34 RS - Bit map of lines to be altered. 
7317 i* CSRA - Contains address of the DUT CSR. 
7318 34 IESTAT - Contains the current state of the TX and RX interrupt 
7319 3* enable bits in the CSR. 
vane 34 LNCTRA - Contains address of the DUT LNCTRL registers. 
1 3* 
3 3* OUTPUTS: LNCTRL - Specified DUT Line Control Registers are altered. 
3* 
Ln 3* CALLING SEQUENCE: JSR PC ,WTWLNC 
32 3* 
7326 ;* COMMENTS: 
7327 ;* 
7328 3* SUBORDINATE ROUTINES CALLED: ALTFLD. 
7329 b-- SRORSREEEEEE ODES OOS EERE EERE EES OEE OS OS OOOO OOO kkk hk eee eee 
7330 
7331 040250 WTWLNC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
_ 040250 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2 3¢ 
cone ; Set up the parameters for the call to ALTFLD. 
334 4° 
7335 040254 013701 002310 MOV LNCTRA,R1i sSET UP THE REGISTER ADDRESS PARAMETER. 
7336 040260 010002 MOV RO,R2 sSET UP THE DESIRED REGISTER CONTENTS. 
7337 040262 010503 MOV RS ,R3 sSET UP THE BIT MAP OF LINES TO ALTER. 
hn 040264 012704 177777 MOV #-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 
33 i+ 
7340 ; Call the subroutine which alters the register contents. 
7341 a* 
ay 040270 004737 026760 JSR PC,ALTFLD sALTER THE REGISTER CONTENTS. 
7343 
7344 040274 60$: PASS sRESTORE GPRS. 
040274 004736 JSR PC,@(SP)-+ ;RETURN TO PREGOS SUBRT. 
7345 040276 000207 RTS PC 


r-— 
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SEQ 0190 


7347 -SBTTL GLOBAL SUBROUTINE - WTWLNS - 
7348 {PAPAS SEEEEE SEEGER EELS E66 60400404 4600000006 04000 OO OOOO Oh hh hhh ee eens 
7349 34 - Write Word to all Lines routine - 
7350 3% This subroutine writes a specified word to the specified DHV11-M device 
7351 3% register for each of the DHV11-M lines. It could be used to clear all 
7352 i* of the LNCTRL registers or to initialize all of the LPR registers to 
7353 ie the same parameters. 
7354 ;* 
7355 3;* INPUTS: Ri - Address of the specified registers. 
7356 ;* R2 - Word to write into the specified registers. 
7357 34 IESTAT - Saved states of the TX.IE and RX.IE bits. 
7358 3% MAPLNS - Equated to bit map of lines on device (8 for DHV11). 
7359 3% CSRA. 
7360 i* 
7361 3* OUTPUTS: DEVICE REGISTERS - Specified registers given new value. 
7362 3* CSR IND.ADR.REG field - Destroyed. a 
hn 3% CSR Interrupt Enable bits - Set to states in IESiAT. 
3* 
Mh ay +* CALLING SEQUENCE: JSR PC ,WTWLNS 
6 3% : 
7367 3* COMMENTS: Note that the specified registers for all lines are altered 
7368 ;* by this routine. This routine should NOT be used to alter 
7369 i* the states of partial register fields or to alter a register 
7370 3% for fewer than all of the l'nes. 
Li 3% The specified registers are read before being written. 
7* 
7373 ;* SUBROUTINES CALLED: ALTFLD. 
7374 Te ahatachatachacecaceteeedeeeeehe ehhh LLL LL LLL LT Litt TTL TT TTT TTT TTT TTT TTT TT Te TTT Tet 
7375 
7376 040300 WTWLNS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
var 040300 004537 005474 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
7 3+ 
Adag + Set up the bit map of lines to change and mask of bits to alter parameters. 
7380 040304 012703 000377 ; MOV #MAPLNS,R3 sGET THE BIT MAP OF LINES TO CHANGE. 
coe 040310 012704 177777 MOV #-1,R4 sINDICATE ALL 16 BITS TO BE CHANGED. 
82 3+ 
7383 ; Call the subroutine to write the specified registers. 
7384 a- 
7385 040314 004737 026760 JSR PC,ALTFLD sCHANGE THE REGISTERS. 
7386 
7387 040320 60$: PASS ;RESTORE GPRS. 
040320 004736 JSR PC,@(SP)-+ ;RETURN TO PREGOS SUBRT. 
7388 040322 000207 RTS PC 


—— 
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7413 040324 
040324 


7417 040330 
7418 040334 
7419 040336 
7420 040340 


7424 040344 


7426 040350 
040350 
7427 040352 


—— 


004537 


013701 
010002 
010503 
012704 


004737 


004736 
000207 


005474 


002304 


177777 


026760 





- WTWLPR - 
-SBTTL GLOBAL SUBROUTINE - WTWLPR - 
BE Ml acachatachacetetaetaeeeeeethne nh bth LLL TELL LLL LLL TTT TTT TTT TTT TTT tT TTT tT 
3* - Line Parameter Register Setup Routine - 
3% This subroutine is used to set the Device Under Test (DUT) Line 
34 Parameter Registers (LPR) to the specified state. Only the LPRs for 
3% the specified lines are altered. 
7% 
3® INPUTS: RO - New line parameters. 
;* RS - Bit map of lines to be altered. 
;* CSRA - Contains address of the DUT CSR. 
;* IESTAT - Contains the current state of the TX and RX interrupt 
3% enable bits in the CSR. 
34 LPRA - Contains address of the DUT LPR. 
;* 
;* OUTPUTS: LPR - Specified DUT Line Paramter Registers are altered. 
3;* 
3* CALLING SEQUENCE: JSR PC ,WTWLPR 
3* 
;* COMMENTS: 


7* 
3# SUBORDINATE ROUTINES CALLED: ALTFLD. 


3-- SERSEESEEEEEEEEEEEEEERESERERESAASEEASAREAAAEESRAEAEAEAREREEEEEEADEEEREEEELS 


WTWLPR:: SAVE 


sSAVE CONTENTS OF GPRS RO THRU RS. 


JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


3* 
; Set up the parameters for the call to ALTFLD. 


s- 


60$: 


MOV 
MOV 
MOV 
MOV 


JSR 


PASS 
RTS 


LPRA,R1 
RO,R2 
RS,R3 
#-1,R4 


sSET UP THE REGISTER ADDRESS PARAMETER. 
sSET UP THE DESIRED REGISTER CONTENTS. 
sSET UP THE BIT MAP OF LINES TO ALTER. 
sSELECT ALL REGISTER BITS TO BE ALTERED. 


3*¢ 
; Call the subroutine which alters the register contents. 


PC,ALTFLD sALTER THE REGISTER CONTENTS. 


PC 


JSR PC,@(SP)+ 


sRESTORE GPRS. 


sRETURN TO PREGOS SUBRT. 
















SEQ 0191 
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SEQ 0192 
INTERRUPT SERVICE ROUTINE - CACHRX - 
7429 -SBTTL INTERRUPT SERVICE ROUTINE - CACHRX - 
7430 34 SOEREOOE 0464 60066000660006660006 0006060004804 0004 004040 EE EERE 
7431 3% - Catch Receiver interrupt. 
7432 34 This routine is used in several tests, to log a count of the 
ery i* number of receiver interupts that occur. 
3% 
7435 ;* INPUTS: CSRA - Contains the address of the CSR. 
7436 3% RXINTC - Holds the count of the number of RX interrupts 
7437 3% that occurred. 
7438 3* 
case 3# OUTPUTS: RXINTC - Contains the updated interrupt count. 
3* 
7441 3* 
7442 3* CALLING SEQUENCE: Put the address of the label CACHRX in the vector 
7443 ;* location. 
7444 3% 
7445 3 COMMENTS: 
7446 3* 
7447 3* SUBORDINATE ROUTINES CALLED: none 
7448 g-- SECEAEEEEEEEEESEEEEEEEEEEEEEES EEDA DDEDEEEE DS ODES OD EEEEEE ODED EDEEEEEEEEEEEES 
7449 
7450 040354 CACHRX: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
040354 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
7451 040360 013701 002412 MOV RXINTC,R1 sGET THE RECEIVER INTERRUPT COUNT 
7452 040364 005201 INC Ri sINCREMENT THE COUNT 
7453 040366 102001 BVC 2s sBRANCH IF NO OVERFLOW OCCURRED 
7454 040370 005301 DEC Ri sRESET THE COUNT TO 177777 
7455 040372 010137 002412 2s: MOV R1,RXINTC sSAVE NEW COUNT VALUE 
7456 040376 60$: PASS sRESTORE GPRS. 
040376 004736 JSR PC AC SP)+ ;RETURN TO PREGOS SUBRT. 


7457 040400 000002 RTI 


— 
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INTERRUPT SERVICE ROUTINE 


7480 040402 

040402 
7481 040406 
7482 040412 
7483 040414 
7484 040416 
7485 040420 
7486 040424 

040424 
7487 040426 


- 


004537 
013701 

01 
005301 
010137 


004736 
000002 


005474 
002416 


002416 


- CACHTX - 
-SBTTL INTERRUPT SERVICE ROUTINE - CACHTX - 
zee 806660066006 0000000006 000606 600000000000 0606000000000 000000000000000000008 
34 - Catch Transmiter interrupt. 
3* This routine is used in several tests, to log @ count of the 
3* number of transmission interrupts that occur. 
;* 
3* INPUTS: CSRA - Contains the address of the CSR. 
3* TXINTC - Holds the count of the number of TX interrupts 
;* that occurred. 
3* 
3# OUTPUTS: TXINTC - Contains the updated interrupt count. 
3% 
34% 
3# CALLING SEQUENCE: Put the address of the lebel CACHTX in the vector 
34 location. 
Ae 
3* COMMENTS: 


3# SUBORDINATE ROUTINES CALLED: none 
i ~~ SOO669 0606600660 000660006060606 000000000600 06 0000000000000000000000000000008 


CACHTX: : SAVE 


JSR 
MOV TXINTC Ri 
INC R1 
BYC 2$ 
DEC Ri 
23: MOV R1,TXINTC 
60$: PASS 
JSR 
RTI 





sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 

sGET THE TRANSMISSION INTERRUPT COUNT 
sINCREMENT THE COUNT 

sBRANCH IF NO OVERFLOW OCCURRED 

sRESET THE COUNT TO 177777 

sSAVE NEW COUNT VALUE 

sRESTORE GPRS. 

PC ,AC(SP)+ sRETURN TO PREGOS SUBRT. 





SEQ 0193 









































002450 


002450 
002452 


002452 
002454 


002456 002454 


- CLKINT - 
-SBTTL INTERRUPT SERVICE ROUTINE - CLKINT - 
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i +¢ C060604666066 0606 060060000000000000006000600060000000000000000000000000000808 
This routine is executed CLKHRZ times per second. It decrements the 


two timer counters down to zero. 


TIMER1 - Timer counter #1. 





TIMER2 - Timer counter #@2. 
TIMERS - Timer counter for cell of BREAK macro. 


OUTPUTS: The 2 timer counters are decremented if they ere not zero. 


CALLING SEQUENCE: Put @CLKINT in the clock interrupt vector slot. 
Put the desired time period (seconds times CLKHRZ) in 
either TIMER1 or TIMER2 and poll the respective timer 
counter to detect its going to 0 on time-out. 


COMMENTS: The 2 counters will not wraperound but will stop et 0. This 
allows the detection of a time-out any time after the time-out 
has occurred until the timer counter is set to enother velue. 


4 
3# SUBORDINATE ROUTINES CALLED: None. 


t-- 60666006 6666666000 6066066006 060006000000600000000060000000000000000600000008 


CLKINT:: TST TIMER1 
BEQ 2s 


23: 


4$: 


BNE $ 

MOV BCOUNT , TIMERS 
Vv RO, -(SP) 

BREAK 

MOV (SP)+,RO 


sCHECK FOR TIMER1 AT ZERO. 

sBRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 
sDECREMENT TIME COUNT. 

sCHECK FOR TIMER2 AT ZERO. 

sBRANCH TO LEAVE IT ALONE IF IT’S ALREADY ZERO. 
sDECREMENT TIME COUNT. 

sDECREMENT THE BREAK COUNT. 

sEXIT IF NOT TIME TO CALL BREAK. 

sSET UP TIME TILL NEXT BREAK. 

sSAVE CONTENTS OF RO FROM BREAK MACRO. 
sCHECK FOR OPERATOR CONTROL/C. a 


sRESTORE CONTENTS OF RO. 


C$BRK 




























7551 


7554 040510 
7555 040514 
7556 040516 
7557 040520 
7558 040524 
7559 040530 


052701 


023737 
003002 
010137 
004736 
000002 


005474 
141572 
002412 


002412 
002414 
000001 
000001 


040000 


002412 
002414 


- RXBRRT - 


002420 


000010 


-SBTTL INTERUPT SERVICE ROUTINE 
b+ SHSRSSSSSSSSSSSESSAS SEES SEES RESESERERESESERESEREREESEDALEDESEEEDEELEREEEEES 


ie - BR Level Test Receive Interrupt Service Routine - 

3% This service routine handles Receive Interrupts during the Interrupt 
3% BR Level Test. This routine counts the interrupt and sets e fleg 
1 to indicate thet the interrupt hes occurred. It also checks the 
3% flag which indicetes thet e TX interrupt hes occurred. If the TX 
3% interrupt fleg is set, this routine sets an interrupt order error 
;o flag indicating thet e trenemit interrupt wes serviced before e 
3% simultaneous receive interrupt. 

3% 

3* INPUTS: RXINTC - Holds the count of the number of RX interupts. 
34 RXINTF - RX Interrupt flegs. 

3% 

3* OUTPUTS: RXINTC - Contains the updeted interupt count. 

34 RXINTF - RX Int flags: 

po (Bit 0 set, bit 14 set if TXINTF bit 0 is set.) 
3% 


* 
s# COMMENTS: 


RXBRRT:: SAVE 


3¢ 

+ 8 FIFO codes will ceuse 8 interrupts, efter these 8 codes we don't went 
s to check the interrupt order, beceuse perheps e BMP code hes come in 

s between the servicing of the 8 FIFO code interrupts and the servicing 
s Of one of the TX interrupts. 


t- 
43: CMP 
BGT 
MOV 
60$: S 


RTI 


s# CALLING SEQUENCE: 
& 
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NOTE: The FIFO is purged by this routine. 


3% 
s# SUBORDINATE ROUTINES CALLED: None. 
i-- $O4666064666606 660606 6000666000000000000006 6006 05000000000000000000000000006 


JSR 
GRBUFA,RO 
RXINTC,R1 
R1 


2s 

Ri ,RXINTC 
RXINTF Ri 
#BITO,R1 

+> hea TXINTF 


#61T14,R1 


RXINTC ,NUMLNS 
60% 
R1 ,RXINTF 

JSR 


Put the eddress of the label RXBRRT in the vector 
location. 


SEQ 0195 





- RXBRRT - 























sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGO sCALL REGISTER SAVE SUBRT. 
sREAO THE CHAR OUT OF THE FIFO. 

sGET THE INTERUPT COUNT. 

sINCREMENT THE COUNT. 

sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
sSAVE NEW COUNT VALUE. 

sGET THE RX INTERRUPT FLAGS. 

sSET THE RX INTERRUPT HAS OCCURRED FLAG. 
sTEST THE “TX INT HAS OCCURRED” FLAG. 
sSKIP_ SETTING ERROR FLAG IF NO TX INT. 
sSET THE INTERRUPT ORDER ERROR FLAG. 












sTEST FOR ALL SELFTEST CODE INTS DONE. 
sSKIP_ UPDATING RX INT FLAGS IF EXTRA RX INTS. 
sUPOATE THE RX INTERRUPT FLAGS. 


sRESTORE GPRS. 
PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
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7575 
7576 


040570 
040572 
040576 


040600 
040606 
040610 
040614 
040620 
040626 
040634 
040636 


040644 
040650 
040656 
049660 
040664 
040666 
040670 
040674 
040700 


010246 
017702 
100054 


023727 
103402 
004737 
010277 
062737 
023727 
103403 
012737 


005237 
023727 
001016 
005737 
100413 
010546 
012705 
004737 
010537 


141504 


003066 


032412 
142244 
000002 
003064 


003970 


003066 
003066 


002656 
000377 


036352 
002410 





- RXCHRS - 


000100 


003064 
003270 


003064 


000030 


-SBTTL INTERRUPT SERVICE ROUTINE 


zee 0006006668 0060606 606066060666 0660060 6606606060060060000666060006060060606660600068086 


- RXCHRS - 


- DMA RECEIVE Interrupt Service Routine - 


32 This routine executes in response to en interrupt ceused by the DUT 

3¢ RX.DATA.AVAIL bit becoming active. This routine reeds cherecters from 
34 the DUT receive character FIFO and deposits them into the receive 

34 buffer in memory. If the number of cheracters in the receive buffer 
34 exceeds a specified threshold, transmission is halted (by clearing ell 
34 DUT TX.ENABLE bits) and if the receive buffer is full reception is 

3* halted (by disabling RX interrupts). The routine exits if the receive 
34 buffer becomes full or if a character is read from the FIFO with the 
:¢ DATA.VALID bit clear. 

3@ INPUTS RBUFA - Conteaine address of the DUT RX cheracter FIFO. 

38 RXBCNT - RX buffer character count. 

34 RXBDTX - Eouated to RX buffer level at which to disable TX. 

34 RXBEND - Label after end of the RX buffer area in memory . 

3* RXBFUL - Equated to the capacity of the RX buffer. 

34 RXBIPT - Pointer to next available input slot of RX buffer. 

34 RXBSTA - Lebel at start of RX buffer area in memory. 

34 

3@ OUTPUTS: RXBIPT - Updated to point to next input slot of RX buffer. 

34 RXBCNT - RX buffer character count (Incremented). 


3* 
3# CALLING SEQUENCE: 


3% 


3% 
3# COMMENTS: 
3% 


TXENBM - M 


of previous DUT TX.ENABLE states. 


ap 
CARRY - “Success” flag (Set if buffer is not full). 


Put the address of the label RXCHRS in the vector 


location. 


If the RX buffer is full upon entry, this routine aborts the 


program. 


3* 
3* SUBORDINATE ROUTINES CALLED: RXIEO, TXDSBL. 
F-- SHSKSAESEKEEAESEEEEAESEAAKESARAREASSAASAALEEELEAEASESEEALEEREDEEEEARADEREES 


RXCHRS: : 


2s: MOV 


BPL 


4$: MOV 


63: INC 


MOV 
ORBUFA ,R2 
60$ 


RXBCNT , ORXBFUL 
4s 


PC,OOPS 

R2,@RXBIPT 

#2 ,RXBIPT 

RXBIPT , @RXBEND 
$ 


6 
ORXBSTA,RXBIPT 


RXBCNT 
RXBCNT , @RXBDTX 
8$ 


RS, -(SP) 

@MAPLNS,RS 
PC, TXDSBL 
RS, TXENBM 


R2,-(SP) 


sSAVE CONTENTS OF GPR R2. 
sREAD A CHARACTER FROM THE DUT RX FIFO. 
sEXIT THE ROUTINE IF THE DATA.VALID BIT IS CLR. 


sCOMPARE BUFFER COUNT WITH BUFFER CAPACITY. 
sSKIP ABORT IF BUFFER IS NOT FULL. 

sABORT, MUST SE A PROGRAM BUG. 

sPUT THE CHAR IN THE BUFFER. 

sUPDATE POINTER TO THE NEXT BUFFER SLOT. 
sCHECK IF POINTER SHOULD WRAP AROUND. 

sSKIP WRAPAROUND IF POINTER IS NOT AT END. 
sWRAP INPUT POINTER AROUND. 


sCOUNT THIS CHARACTER AS BEING IN THE BUFFER. 
sCHECK FOR BUFFER AT DISABLE TX LEVEL. 

sSKIP DISABLING TX IF BUFFER LEVEL NOT CORRECT. 
sCHECK STATE OF TX DISABLE FLAG. 

sBRANCH IF TRANSMISSION ALREADY DISABLED. 

sSAVE THE VALUE OF GPR RS. 

sSPECIFY THAT ALL LINES SHOULD BE AFFECTED. 
sCLEAR THE TX ENABLES FOR ALL LINES. 

sSAVE PREVIOUS TX ENABLE STATES IN STORAGE. 





SEQ 0196 
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INTERRUPT SERVICE ROUTINE 


7632 040704 
7633 040706 
7634 

7635 040714 
7636 040722 
7637 

7638 040724 
7639 

7640 040730 
7641 040732 


012605 
012737 


023727 
103723 


004737 


012602 
000002 


100000 
003066 


035546 





- RXCHRS - 


002656 
000100 83: 


60$: 


MOV 
MOV 


CMP 
BLO 


JSR 


MOV 
RTI 


(SP)+,RS 
B1IT15,TXDBLF 


RXBCNT , ORXBF UL 
es 


PC ,RXIEO 
(SP)+,R2 





SEQ 0197 


sRESTORE GPR RS. 
sPREVENT TX FROM BEING DISABLED AGAIN. 


sCHECK FOR BUFFER FULL CONDITION. 
sLOOP TO READ ANOTHER CHAR IF BUFFER NOT FULL. 


sBUFFER IS FULL, DISABLE RX INTERRUPTS. 
sRESTORE R2 TC ITS SAVED VALUE. 
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040734 
040734 
040740 
040746 
7676 040750 
040756 
040762 
7679 040764 
7680 040766 
040772 
040776 
041002 
041006 
041010 
041014 
041014 
041016 


004537 
032777 
001003 
052737 
013701 
©. 5e01 
001402 
010137 
013702 
017722 
020237 
103002 
010237 


004736 
000002 


005474 
000200 


100000 
002412 


002412 
002360 
141300 
005012 


002360 


- RXINPT - 


141332 
002414 


-SBTTL 
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SEQ 0198 


INTERUPT SERVICE ROUTINE - RXINPT - 


gee SEEKS SEEEAASESAESAAERESEEEADESEARERAEEAEEEASRERERED ERODES £4400000000408004 


34 - Receive Cheracter Input Interrupt Service Routine - 

34 This service routine inputs a character from the DUT and loads the 

3* char (complete with status flags) into a receive char buffer in 

34 memory. The interrupt is also counted. The receive char buffer is 
;* monitored to ensure that it does not overflow. 

3% 

3* INPUTS: BUFEND - Labels the end of the host memory buffer. 

34 BUFPTR - Contains address of next free buffer location. 

;4 CSRA - Contains the address of the DUT CSR. 

34 RBUFA - Contains the address of the RBUF DUT register. 

34 RXINTC - Holds the count of the number of RX interupts. 

34 RXINTF - RX Interrupt flags. 

3% 

;@ OUTPUTS: BUFPTR - Contains updated address of next free buffer location. 
34 RXINTC - Contains the updated interupt count. 

3¢ RXINTF - RX Int flags (bit 15 set if RX.DATA.AVAIL is clear). 
3* 


3# CALLING SEQUENCE: 


COMMENTS: 


Put the address of the label RXINPT in the vector 
location. 


In case of overflow of the memory buffer, BUFPTR will be 
maintained equal to BUFEND and the word at BURFPTR will be 
the last word read from the DUT FIFO. 

NOTE: This routine can destroy TX.ACTIONS by reading the CSR. 


34 
3* SUBORDINATE ROUTINES CALLED: None. 
i-- SERREEEESEESAAEREAEAERESAEEEEAEREAARERESADOEERAEHEAD SEEDER ESEEEEEREDEERELES 


RXINPT: : 


2s: 


4$: 


60$: 


SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL RCGISTER SAVE SUBRT. 
BIT #B1IT7,8CSRA sTEST RX.DATA.AVAIL BIT OF THE CSR (READS CSR). 
BNE 2$ sBRANCH AROUND SETTING FLAG IF BIT IS SET. 
BIS @BIT1S,RXINTF ;SET THE RX.DATA.AVAIL CLEAR FLAG. 
MOV RXINTC,R1 sGET THE INTERUPT COUNT. 
INC R1 sINCREMENT THE COUNT. 
BEQ 4¢ sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
MOV R1,RXINTC sSAVE NEW COUNT VALUE. 
MOV BUFPTR ,R2 sGET THE POINTER TO NEXT FREE BUFFER WORD. 
MOV ORBUFA,(CR2)+ sREAD A CHAR FROM THE FIFO INTO BUFFER. 
CMP R2,BUFEND sTEST FOR POINTER BEYOND END OF BUFFER. 
BHIS 60$ sSKIP THE PTR UPDATE IF PTR OUT OF BOUNDS. 
MOV R2,BUFPTR sUPDATE THE BUFFER POINTER. 
PASS sRESTORE GPRS. 
. JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
RTI 
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TRAP SERVICE ROUTINE 


7689 
7690 


7714 041020 
7715 041024 
7716 041026 
7717 041032 
7718 041040 


021627 
001402 
000177 
052737 
000002 




















SEQ 0199 


- TP4BRT - 
-SBTTL TRAP SERVICE ROUTINE - TP4BRT - 
Dh haceaeetadete een eh Lib t ttt t TTL TTT TTT TTT TTT TT Tire TT TTT TTT Tet 
3* Bus Time-out Trap (004 trap) Service Routine - 
3% This routine is used during the DMA ADDRESS TEST. 
i* It determines if the 004 trap was caused by an “expected” error or 
3% not by examining the return PC value on the stack. If the trap is 
;* unexpected, this routine jumps to the normal Diagnostic Supervisor 
7% 004 trap handling routine. 
;* 
3@ INPUTS: SP - Points to the PC where the trap occured. 
34 TRPAD2 - Label at the address where “expected” traps occur. 
34 TP4FLG - 004 trap flags. 
3% 
3@ OUTPUTS: TP4FLG - Bit 15 is set if “expected” trap occured. 


s 
CALLING SEQUENCE: Put address pointed to by TP4BRT in 004 vector. 
Occurence of 004 trap vectors to this routine. 


D2 will be handled by the normal 004 trap service routine. 


;* 

:* 

;* 

3* COMMENTS: ~~ Bay trap which occurs at an address other than that labeled 
3% 

34 This routine is used in conjunction with CKTRPB subroutine. 

& 


; 
3* SUBORDINATE ROUTINES CALLED: None. 
I PRERREAAAEESEEEEEREEEEEE EERE EERE ED DS EES EOE OEE OEEE EEE EE EEE EOEDREREEERERERS 


030154 TP4BRT:: CMP (SP), @TRPAD2 sCOMPARE EXPECTED ADDR WITH TRAP RET PC. 

BEQ 2$ ;IF THEY MATCH, CONTINUE THIS ROUTINE. 
141370 JMP STP4VEC sIF NOT, JUMP TO NORMAL 004 TRAP SERVICE RTN. 
100000 002424 23%: BIS #BIT1S,TP4FLG ;SET THE 004 TRAP OCCURED FLAG. 

RTI sALL DONE, GO BACK TO THE TEST. 
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SEQ 0200 


7720 -SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN - 
7721 jPREREEEEEEE SEEDED ODES EROS EEDEEEOEEEOEOE EE ODES OEODEE OOOO OE OEEEEREDEEEEDEEEEEEDS 
7722 34 Bus Time-out Trap (004 trap) Service Routine - 
7723 3% This routine is used during the Device Register Address Access Test. 
7724 ;* It determines if the 004 trap was caused by an “expected” error or 
7725 78 not by examining the return PC value on the stack. If the trap is 
7726 3* unexpected, this routine jumps to the normal Diagnostic Supervisor 
7727 3* 004 trap handling routine. 
7728 34 
7729 3;* INPUTS: SP - Points to the PC where the trap occured. 
7730 3% ADRPTR - Label at the address where “expected” traps occur. 
7731 34 TP4FLG - 004 trap flags. 
7732 i* 
aeae 3* OUTPUTS: TP4FLG - Bit 15 is set if “expected” trap occured. 
a 3* 
7735 3* CALLING SEQUENCE: Put address pointed to by TP4RTN in 004 vector. 
hb ia Occurence of 004 trap vectors to this routine. 
737 3* 
7738 ;* COMMENTS: jon 004 trap which occurs at an address other then that labeled 
hho 3* ADRPTR will be handled by the normal 004 trap service routine. 
740 3* 
7741 3* SUBORDINATE ROUTINES CALLED: None. 
7742 FPRRERAESESEASEESE EASES SE SEAEEEED SEEDED EERE EEDE EOE ODES OREEEEEEDEEEEEED EERE EEE 
7743 
7744 041042 021627 030124 TP4RTN:: CMP (SP), #ADRPTR sCOMPARE EXPECTED ADR AGAINST TRAP RET PC. 
7745 041046 001402 BEQ 2s ;IF THEY MATCH, CONTINUE THIS ROUTINE. 
7746 041050 000177 141346 JMP @TP4VvEC sIF NOT,JUMP TO NORMAL 004 TRAP SERVICE RTN. 
7747 041054 052737 100000 002424 23: BIS #BIT1S,TP4FLG sSET THE 004 TRAP OCCURED FLAG. 
7748 041062 000002 RTI sALL DONE, GO BACK TO THE TEST. 


—— 
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7790 041100 
7791 041104 
7792 041106 
7793 041110 
7794 041114 
7795 041116 
7796 041120 


7804 041124 
7805 041132 


-— 


004537 
017701 
010100 
000402 


017701 
100033 
000301 
042701 
010104 
006304 
016405 


926464 
103403 


005474 
141204 


141174 


177760 


002534 


003652 003612 





- TXDMA - 


-SBTTL INTERRUPT SERVICE ROUTINE - TXDOMA - 
50% SHROSEEEEEEE EE OE O0 40000006 600460000046 0006 06 0008000000 40000000000000000808008 
33 - DMA Transmit Interrupt Service Routine - 
34 This routine executes in response to an interrupt caused by the DUT 
34 TX.ACTION bit becoming active. This routine initiates the TX of @ 
3% new DMA buffer of characters or sets the TX Done Flag for the correct 
3% line if TX is complete on that Line. 
3* 
;* INPUTS: BITTBL - Label of table of words each with a bit set. 
;* CNCNTB - Base of @ of chars to TX/RX table. 
34 CSRA - Contains the address of the DUT CSR. 
3% DPENDB - Base of the date pattern end table Centry per line). 
34 DPLENB - Base of the data pattern length table. 
3* IESTAT - Preserved states of the DUT interrupt enable bits. 
34 TXCNTB - Lable at base of the TX character counter table. 
3% TXPTRB - Label at base of the TX date pattern pointers table. 
7% 
3# OUTPUTS: TXCNTx - Counters incremented for lines on which chars sent. 
3% TXDONF - TX done flags set for lines which have sent all chars. 
3% TXINTF - TX int flags (bit set if DMA.HO found set on line). 
3* 
3* CALLING SEQUENCE: Put the address of the label TXDMA in the vector 
:* location. 
;* 
3* CCMMENTS: 
3* 
;* SUBORDINATE ROUTINES CALLED: DODMA. 
Salil acachatachceteeeeeeeehnhh tht tL LLL LLL LLL TTT TT TTT TT TT TTT TTT Tet ttt 
TXDMA:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV @CSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
MOV R1,RO sSAVE INITIAL CONTENTS OF IND.ADR.REG FIELD. 
BR 4$ sBRANCH TO SKIP DOUBL READING OF DUT CSR. 
3? 
; Read the contents of the DUT CSR. This will clear the TX.ACTION CSR bit. 
; If TX.ACTION is not set, exit this routine. 
; Determine the line for which the TX.ACTION was set. 
; Calculate an offset for use in accessing tables (2 times the line number). 
; Get the bit map of this line. 
— 
2s: MOV @CSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
4$: BPL 60$ sEXIT ROUTINE IF TX.ACTION IS CLEAR. 
SWAB Ri sCALCULATE THE LINE NUMBER OF THE LINE WHICH IS 
BIC #177760,R1 ; ASSOCIATED WITH THE TX.ACTION. 
MOV R1,R4 sCALCULATE AN OFFSET FOR USE IN ACCESSING 


R4 ; LINE COUNTER AND POINTER IN TABLES. 
MOV BITTBLC(R4),R5 ;GET THE BIT MAP OF THIS LINE. 
3¢ 
; Get the TX character counter for this line. 
; If all the characters have been sent for this line: 
; Set the TX done flag for this line. 
; Don't send a char to the line (no more TX.ACTIONS on this line). 
3 Loop to check the TX.ACTION for another line. 


CMP TXCNTBCR4),CHCNTBC(R4) ;COMPARE @ CHARS SENT AND TX COUNT. 
BLO 6$ sGO TO SEND A CHAR IF NOT ALL CHARS SENT. 

























SEQ 0201 
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SEQ 0202 
INTERRUPT SERVICE ROUTINE - TXOMA - 
7806 041134 050537 002652 BIS RS, TXDONF sSET THIS LINE'S TX DONE FLAG. 
7807 041140 000757 BR 2s sLOOP TO CHECK TX.ACTION AGAIN. 
7808 34 
7809 ; Start the DMA of the next buffer (data pattern) on this line. 
7810 3 Get the data pattern length for this line. 
oeak 3 Get the start address of the date pattern. 
81 g- 
7813 041142 016403 003352 6$: MOV DPLENB(R4) ,R3 sPASS DATA PATTERN LENGTH FOR LINE TO DODMA. 
eae 041146 016402 003512 MOV TXPTRBC(R4) ,R2 sPASS THE TX START ADR TO DODMA. 
7¢ 
ea ; Write DMA parameters to the DUT. 
81 3° 
7818 041152 004737 030624 JSR PC ,DODMA 
eae 041156 103403 BCS 8$ s;SKIP ERROR IF DODMA WAS SUCCESSFUL. 
820 :¢ 
ew = ; Set the proper bit of the TX interrupt flags to indicate the line error. 
822 3- 
7823 041160 050537 002420 BIS RS , TXINTF sINDICATE THE ERROR. 
et 041164 000402 BR 10$ ;SKIP UPDATING POINTERS AND COUNTERS. 
782 i+ 
7826 ; Update the TX character for this line. 
7827 ; Update the TX buffer pointer for this line. 
7828 i- 
yore 041166 060364 003652 8$: ADO R3,TXCNTBCR4) ;ADD THE DATA PAT LENGTH TO THE TX COUNT. 
830 3¢ 
es ; Loop to check the TX.ACTION bit for another line. 
7832 he 
io 041172 000742 10$: BR 2s sLOOP BACK TO CHECK TX.ACTION BIT AGAIN. 
8 
7835 041174 013701 002374 60$: MOV IESTAT,R1 sGET THE PRESENT STATES OF TX.IE & RX.IE BITS. 
7836 041200 042700 177760 BIC #177760,R0 sGET SAVED IND.ADR.REG FIELD BITS. 
7837 041204 050001 BIS RO,R1 s;COMBINE IND.ADR.REG FIELD BITS WITH IE BITS. 
7838 041206 010177 141066 MOV R1,@CSRA sRESTORE THE DUT CSR IND.ADR.REG FIELD. 
7839 041212 PASS sRESTORE GPRS. 
041212 004736 JSR PC ,@CSP)+ s;RETURN 70 PREGOS SUBRT. 
7840 041214 000002 RTI 


-— 
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SEQ 0203 
INTERUPT SERVICE ROUTINE - TXINTR - 
7842 -SBTTL INTERUPT SERVICE ROUTINE - TXINTR - 
7843 BE Ml adachateaceadee eet nt htt T LLL LTT TTT TTT TTT TTT TT TT TTT TTT 
7844 3% - Transmit Interrupt Service Routine - 
7845 3* This routine handles a transmit interrupt from the Device Under Test 
7846 i* (DUT) by counting the interrupt and reading the DUT CSR to clear the 
7847 ;* interrupt request. This routine also sets a flag to indicate that 
7848 3* e TX interrupt has occurred and sets a fleg if the TX.ACTION bit is 
ee 3” not set in the read contents of the DUT C°R. 
8 3% 
7851 3# INPUTS: CSRA - Contains the address of the CSR. 
7852 ;* TXINTC - Holds the count of the number of TX interupts. 
7853 ;* TXINTF - TX Interrupt flags. 
7854 3% 
7855 3# OUTPUTS: TXINTC - Contains the updated TX interupt count. 
ee :* TXINTF - TX Int flags (bit 0 set, bit 15 set if TX.ACTION elr). 
3* 
7858 3* CALLING SEQUENCE: Put the address of the label TXINTR in the vector 
7859 3* location. 
7860 :* 
7861 ;* COMMENTS: 
7862 ;* 
7863 3* SUBORDINATE ROUTINES CALLED: none 
7864 Ball acachatneatetecatecahceheethttheLLLLLLLLLLLi LTT T TTT TTT TTT TTT Terre Tt 
7865 
7866 041216 TXINTR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
041216 004537 005474 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
7867 041222 013701 002416 MOV TXINTC,R1 ;GET THE TX INTERUPT COUNT. 
7868 041226 005201 INC R1 sINCREMENT THE COUNT. 
7869 041230 102001 BYVC 2s sBRANCH IF NO OVERFLOW OCCURRED. 
7870 041232 005301 DEC Ri sRESET THE COUNT TO 177777. 
7871 041234 010137 002416 2s: MOV R1,TXINTC sSAVE NEW COUNT VALUE. 
7872 041240 013703 002420 MOV TXINTF ,R3 ;GET THE TX INTERRUPT FLAGS. 
7873 041244 017702 141030 MOV @CSRA,R2 s;READ THE CSR. 
7874 041250 100402 BMI as sSKIP SETTING OF FLAG IF TX.ACTION IS SET. 
7875 041252 052703 100000 BIS #B1IT15,R3 sSET THE TX.ACTION CLEAR FLAG. 
7876 041256 052703 000001 4$: BIS *BITO,R3 sSET THE TX INT HAS OCCURRED FLAG. 
7877 041262 010337 002420 MOV R3, TXINTF sUPDATE THE TX INTERRUPT FLAGS. 
7878 041266 60$: PASS sRESTORE GPRS. 
041266 004736 JSR PC ,ACSP)+ sRETURN TO PREGOS SUBRT. 
7879 041270 000002 RTI 


—— 





—— 


nnn nnn nn nn nnn nn nn er SS sss 


CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 149 
INTERRUPT SERVICE ROUTINE 


041272 
041272 
041276 
041302 
041304 
041310 
041312 
041314 
041316 


041320 
041324 
041326 
041330 
041332 
041336 
041340 


004537 
017701 
010105 
042705 
010546 
005005 
005701 
000402 


017701 
100051 
010102 
000302 
042702 
010203 
006303 


005474 
140776 


137660 


140754 


177760 


- TXSCHR - 


SEQ 0204 
-SBTTL INTERRUPT SERVICE ROUTINE - TXSCHR - 
i t+ SHREEOSEEEEEEE ES 14 0660000606 0600000600 00 00060006000000000600000000000000008 
3* - Single Character Mode Transmit Interrupt Service Routine - 
7% This routine executes in response to an iterrupt caused by the DUT 
;* TX.ACTION bit becoming active. This routine sends the next TX char 
3% or sets the TX Done Flag for the correct line if TX is complete on 
7% that line. 
3;* 
;# INPUTS: ACTLNS - Bit map of active DUT lines. 
;* BITTBL - Label of table of words each with ea bit set. 
;* CHCNTB - Base of @ of chars to TX/RX table. 
;* CSRA - Contains the address of the CSR. 
34 DPENDB - Base of the date pattern end table Centry per line). 
3% DPLENB - Base of the date pattern length table. 
34 IACBIT - Bit mask of inactive TX/RX bits. 
34 IBM - Inacti.e bits mask (reflecting bits per char). 
34 TXCHRA - Contains the address of the DUT TXCHAR register. 
34 TXCNTB - Label at base of TX character counters table. 
74 TXPTRB - Label at the base address of the TX pointers table. 
3* 
3* OUTPUTS: CSR - DUT CSR IND.ADR.REG field is destroyed. 
;* TXCHAR - DUT TXCHARSs have words written to them. 
;* TXCNTx - Counters incremented for lines on which chars sent. 
3% TXDONF - TX done flags set for lines which have sent all chars. 
3* TXPTRB - Each pointer in table points to next TX char for Line. 
3* 
;* CALLING SEQUENCE: Put the address of the label TXSCHR in the vector 
i* location. 
7* 
3* COMMENTS: 


3 

. 

;* SUBORDINATE ROUTINES CALLED: None. 
alialllachachateshacthcachtaeeeteeteet htt TLL LLL LTT TTT TT TTT TTT TT TTT Tt tT 


TXSCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV SCSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
MOV R1,R5 sSAVE THE CONTENTS OF THE DUT IND.ADR.REG 
BIC #137660,R5 s_ FIELD FOR RESTORATION BEFORE RETURN. 
MOV RS, -(SP) sSAVE THE DUT IN.ADD FIELD ON THE STACK. 
CLR RS sCLEAR CHARACTER TRANSMISSION COUNTER. 
TST R1 sSET FLAG FOR TEST AFTER THE FOLLOWING BRANCH. 
BR 4$ sGO HANDLE THE LINE THAT GOT THE TX.ACTION. 


3¢ 

i Read the contents of the DUT CSR. This will clear the TX.ACTION CSR bit. 
; If TX.ACTION is not set, exit this routine. 

; Determine the line for which the TX.ACTION was set. 

; Calculate an offset for use in accessing tables (2 times the line number ). 
; Determine the states of the DUT CSR interrupt enable bits. 


2$: MOV @CSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
4$: BPL 60$ sEXIT ROUTINE IF TX.ACTION IS CLEAR. 
MOV R1,R2 sCALCULATE THE LINE NUMBER 
SWAB R2 ; OF THE LINE WHICH IS 
BIC #177760,R2 s ASSOCIATED WITH THE TX.ACTION. 
MOV R2,R3 sCALCULATE AN OFFSET FOR USE IN ACCESSING 
ASL R3 ; LINE COUNTER AND POINTER IN TABLES. 





« 
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7937 
7938 
7939 
7940 
7941 
7942 
7943 


—— 


041342 042701 137677 


041346 
041354 
041356 
041364 


041366 
041370 
041374 
041400 
041402 
041406 
041410 
041414 
041420 
041424 
041430 
041434 
041436 


041442 
041446 
041450 
041454 
041454 
041456 


026363 
103404 
056337 
000757 


050201 
010177 
016304 
112400 
020463 
103402 
166304 
010463 
043700 
052700 
010077 
005205 
005263 


020527 
103724 
012677 


004736 
000002 


003652 
002534 


140704 
003512 


003312 
003352 
003512 
002366 
100000 
140646 


003652 


000010 
140624 





SS 
CVOHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 149-1 













SEQ 0205 
- TXSCHR - 
BIC $137677,R1 sGET BIT MASK OF INTERRUPT ENABLE STATES. 
3¢ 
; Get the TX character counter for this line. 
; If all the characters have been sent for this line: 
; Set the TX done flag for this line. 
3 Don't send a char to the line (no more TX.ACTIONS on this line). 
: Loop to check the TX.ACTION for another line. 


003612 CMP TXCNTBCR3),CHCNTBCR3) ;COMPARE TX CHAR COUNT AND @ TO TX. 
BLO 6$ :GO 70 SEND A CHAR IF NOT ALL CHARS SENT. 
002652 BIS BITTBLCR3), TXDONF sSET THIS LINE'S TX DONE FLAG. 
BR 4$ sLOOP TO CHECK TX.ACTION AGAIN. 


3¢ 
Send the next char to the specified line. 
Set up the IND.ADR.REG field of the DUT CSR using the previously read 
states of the interrupt enable bits. 
Fetch the correct character from the data pattern. 
Update the date pattern pointer for this line using wraparound. 
Mask out inactive date bits and send the character. 
Count the character on the TX char counter for the line. 
Decrement the FIFO slack count to reserve room for this char in the FIFO. 


; 
; 
ios 
; 
6 


$: BIS 


Exit if a maximum of 8 characters have been transmitted, ie.give reception 
ea chance to remove characters from the FIFO. 


R2,R1 ;SET UP THE IND.ADR.REG FIELD OF THE DUT CSR 
MOV R1,@CSRA ;__ WITHOUT AFFECTING THE INTERRUPT ENABLES. 
MOV TXPTRBC(R3),R4  ;FETCH THE TX POINTER FOR THIS LINE. 
MOVB § (R4)+,RO sGET THE NEXT CHAR FOR THIS LINE. 
CMP R4,DPENDB(R3) ;COMPARE POINTER WITH END OF DATA PATTERN. 
BLO 8$ sSKIP RESETTING OF POINTER IF NOT PAST END. 
SUB DPLENB(R3),R4  ;WRAP POINTER AROUND TO BEGINNING OF PATTERN. 
8$: MOV R4,TXPTRB(R3) ;UPDATE THE TX POINTER FOR THIS LINE. 
BIC BM, RO sCLEAR UNUSED BITS OF THE TX CHAR WORD. 
BIS #BIT15,RO sSET THE TX.DATA.VALID BIT OF 1X CHAR WORD. 
MOV RO,@TXCHA sSEND THE CHAR TO THE DUT. 
INC RS sINCREMENT TX CHAR COUNT. 
INC TXCNTBCR3) sINCREMENT THE TX CHAR COUNT FOR THIS LINE. 


3? 


3; Loop to check 


the TX.ACTION bit for another line. 


CMP RS, @NUMLNS sCHECK IF MAX NUMBER OF CHAR HAVE BEEN TX'D. 
BLO 2s sLOOP BACK TO CHECK TX.ACTION BIT AGAIN. 
60$: MOV (SP)+,@CSRA sRESTORE THE IND.ADR.REG FIELD OF THE DUT CSR. 
PASS sRESTORE GPRS. 
_ JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 













(SS 
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SEQ 0206 


7984 hl alalalabalalailalaiaintaininialaintalalnininialaiatainlnintaiaiaintataleintisiaitieitt titi i iti eo e ot eee Se SiC eT Tei eet etait iy 


VOHE .RPT 
5 6 oh i 06 6 sh a a hu gl a ul oh wh su uu lu uu 0 hh ku uh gu 0 wh 0 wh 


7987 ; 


2 
@ 
an 


7992 -SBTTL REPORT CODING SECTION 


7994 3+4 
7995 3; THE REPORT CODING SECTION CONTAINS THE 
sont ; “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 
tl , 
7998 
7999 041460 BGNRPT 
041460 LSRPT:: 
8000 
8001 041460 EXIT RPT 
041460 000167 -WORD J$JMP 
041462 000000 -WORD 1L10025-2-. 


8003 -EVEN 
8005 041464 ENDRPT 
041464 104425 


— 
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SEQ 0207 
PROTECTION TABLE 













pees -SBTTL PROTECTION TABLE 

8009 Fh hahha ahalatahatahalainialaialatialatabatalailetlatalnnlninlnititiii tLe Titre ee TLS CST et ett it it tt tt tt] 
a 

8010 ; 

8011 ; FVTSKL4.P11 

8012 ; 

tee j MASSA SAAS SA AA SAA SASK AAAS NSA SSSA SSSA AAAS SSSA ASSAM KK 








8017 see 
8018 ; THIS TABLE IS USED BY THE RUNTIME SERVICES 
oaks s TO PROTECT THE LOAD MEDIA. 

gs= 








8021 

8022 041466 BGNPROT 

oce3 041466 L$PROT:: 
8024 041466 177777 -1 sOFFSET INTO P-TABLE FOR CSR ADDRESS 
8025 041470 177777 -1 : sOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
8026 041472 177777 -1 sOFFSET INTO P-TABLE FOR DRIVE NUMBER 





ose 041474 ENDPROT 














_—_— — 
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SEQ 0208 
PROTECTION "ABLE 
0084 
8045 , SETESC TASS AG AA AA CHES GAAS EA KGAA AANA ATES AL EA CARTED AA EAdE SECA EA CAKES MA TA SEEARS SEM 
80486 3 
ood 3 VOHE . INI 
804 F 
cone Teer CT ee CeCe Ce TC COCCCCCCCCOCCCeC TCC tC Ce CCeteccerere ttt 4 
8 
8051 
8052 
8053 -SBTTL INITIALIZE SECTION 
8054 pee 
8055 PPI ET IL iti i iririititi titi ti titi iii iii tit TTT Ti TTT TTT TTT TTT TTTiTTiTiTiTi TT TiTTiT 
8056 34 This section contains the code which is performed at the beginning of 
8057 Hg each pass or after a continue command. 
ae 34 This code performs the following actions: 
7% 
8060 34 Moves the information held in the hardware P-table into the global 
8061 34 date area. 
8062 e 
8063 390604006 6666066064660 66 06464666066 464646 66 64606 60006404060404646006064646646066 64446 64446446464606464644% 
8064 — 
8065 041474 BGNINIT 
041474 L$INIT:: 
8066 ;SEE IF PROGRAM JUST STARTED, BR IF YES 
8067 041474 READEF @€F.START 
041474 012700 000040 MOV EF .START,RO 
041500 104447 TRAP CSREFG 
8068 041502 BCOMPLETE NEWSTA 
041502 103416 BCS NEWSTA 
8069 ;SEE IF PROGRAM JUST RESTARTED, BR IF YES 
8070 041504 READEF @€F .RESTART 
041504 012700 0000357 MOV #EF .RESTART,RO 
041510 104447 TRAP CSREFG 
8071 041512 BCOMPLETE NEWRES 
041512 103555 BCS NEWRES 
8072 ;SEE IF THIS IS A NEW PASS, BR IF YES 
8073 041514 READEF @€F.NEW 
041514 012700 000035 MOV EF .NEW,RO 
041520 104447 TRAP CSREFG 
8074 041522 BCOMPLETE NEWPAS 
041522 103554 BCS NEWPAS 
8075 ;SEE IF PROGRAM WAS JUST CONTINUED 
8076 041524 READEF #€F .CONTINUE 
041524 012700 000036 MOV EF . CONTINUE ,RO 
041530 104447 TRAP CS$REFG 
8077 041532 BNCOMPLETE GETPRM 
041532 103160 BCC GETPRM 
8078 041534 000137 042246 JMP ENDIT 
8079 041540 NEWSTA: 
8080 041540 BRESET ;RESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
041540 104433 TRAP CSRESET 
8081 3¢ 
oes ; Set up for Line Time Clock interrupts. 
8084 041542 CLOCK L,R1 ;GET THE CLOCK PARAMETERS. 
041542 012700 000114 MOV #'L,RO 


041546 104462 TRAP CsCLCK 





- 
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012737 
012746 


013737 
012737 


004737 


013737 
012737 
005037 
005037 
012700 
013701 
005037 
005037 
004737 


002440 
002442 
002444 
002446 
002446 


000024 
000021 


000300 
040430 
002444 
000003 


000010 
002446 


002456 
000240 


000004 
041042 


002424 
000100 
002400 
002440 
030112 
002422 


002446 


027032 


000004 
041042 
002424 
002400 
002400 
002464 
002470 
002472 
030112 





000062 
002460 
002460 


002422 
000004 


002400 


000004 


002422 
000004 


2s: 


Vv 
4$: SETVEC 


(R1)+,CLKCSR 
(R1)+, CLKBRL 
(R1)+,CLKVEC 
(R1)+, CLKHRZ 
CLKHRZ, #50. 


es 
#20. ,MSTICK 
4s 
17. .MSTICK 


CLKVEC , @CLKINT , @PRIO6 


CLKHRZ,RO 
RO 


RO ,BCOUNT 
@PRIOS 


SEQ 0209 

MOV RO,R1 

sSTORE CLOCK CSR ADDRESS. 

sSTORE CLOCK BUS REQ INT LEVEL. 

sSTORE CLOCK INTERRUPT VECTOR. 

sSTORE CLOCK FREQUENCY. 

sTEST FOR SOHZ LINE FREQUENCY. 

sBRANCH IF CLOCK IS NOT SOHZ. 

sINDICATE 20MS PER CLOCK TICK. 

sINDICATE 17 MS PER CLOCK TICK. 

sINITIALIZE CLOCK INTERRUPT VECTOR. 
MOV OPRIOG , -(SP) 
MOV @CLKINT, -(SP) 
MOV CLKVEC, -(SP) 
MOV @3,-(SP) 
TRAP C$SVEC 

) #10, SP 


AD 
sINITIALIZE THE BREAK COUNT 
; TO CAUSE A BREAK 
; EVERY 1/2 SECOND. 
sALLOW CLOCK INTERRUPTS DISABLE OTHERS. 


7° 
; Enable the Line Time Clock (LTC) checking to make sure that the CSR 


; is accessable. 


; First set up to catch any 004 traps which occur: 


MOV 
MOV 
3° 


3 Enable LTC 


:- 
CLR 
MOV 
MOV 
MOV 
JSR 
MOV 
BCS 
CLR 
BR 


: Celibrate the 


6$: JSR 


904, TP4VEC 
@TP4RTN, 864 


sSAVE THE EXISTING 004 TRAP VECTOR. 
sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 


checking for 004 trap in case CSR is not there. 


TP4FLG 
@B8IT6,WORDL 
@WwORD1 ,RO 
CLKCSR,R1 
PC .CKTRAP 
TP4VEC ,004 


63 
CLKHRZ 
8$ 


sCLEAR THE 004 TRAP FLAG. 

sSET UP TO SET BIT6 OF THE LTC CSR. 

sSET UP WORD1 AS THE CKTRAP MOVE SOURCE. 

sSET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE. 
sMOVE AND CHECK FOR TRAP. 

sRESTORE THE NORMAL 004 TRAP VECTOR. 

sIF NO TRAP, LTC IS THERE SO CONTINUE. 

sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


DELAY routine milli-second delay count value. 


PC ,CALMSL 


7° 
; Check for Memmory Management present on this machine. 
; If MEM MGT is present, disable it. 


8$: MOV 
MOV 
CLR 
CLR 
MOV 
MOV 
CLR 
CLR 
JSR 


904, TP4VEC 
@TP4RTN, 004 
TP4FLG 
WORD1 
@WORD1 ,RO 
MMSRO,R1 
MMPRES 
MMENAB 

PC ,CKTRAP 


sSAVE THE EXISTING 004 TRAP VECTOR. 

sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
sCLEAR THE 004 TRAP FLAG. 

sPREPARE TO CLEAR THE MEM MGT SRO REGISTER. 
sSELECT CLEARED WORD AS CKTRAP RTN SOURCE. 
SELECT MEM MGT SRO REGISTER AS DESTINATION. 
sINDICATE NO MEM MGT PRESENT IN CASE IT ISN'T. 
sINDICATE MEM MGT IS NOT ENABLED. 

;CLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP. 
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SEQ 0210 


8135 042020 013737 002422 000004 MOV TP4VEC 804 sRESTORE THE NORMAL 004 TRAP VECTOR. 
8136 042026 103003 BCC 10$ 3SKIP INDICATING MEM MGT PRESENT IF IT ISN’T. 
8137 042030 012737 000001 002470 MOV #1 ,MMPRES sINDICATE THAT MEM MGT IS PRESENT. 
8138 042036 005037 002376 10$: CLR PASCNT ;CLR COUNTER USED IN REPORTING ROM VERSION @. 
ates 042042 000137 042054 JMP NEWPAS ;SKIP AROUND THE BUS RESET, IT’S BEEN DONE. 
8141 042046 NEWRES: BRESET sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
042046 104433 TRAP CSRESET 
or | 042050 005037 002376 CLR PASCNT ;CLR COUNTER USED IN REPORTING ROM VERSION @. 
8144 042054 NEWPAS: 
cat 042054 012737 177777 002276 MOV #-1,UNITN sRESET LOGICAL DEVICE TO -1 
3¢ 
8147 ; Increment the pass counter, correct for any overflow. 
pe ; This counter is used in the Rom version test. 
14 3° 
8150 042062 005237 002376 INC PASCNT sINCREMENT THE PASS COUNTER. 
8151 042066 001002 BNE GETPRM s;BRANCH IF WE HAVE NOT YET! OVERFLOWED. 
+ 042070 005337 002376 DEC PASCNT ;SET PASS COUNT TO 177777 OCTAL. 
1 
8154 ; GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
8155 042074 GETPRM: 
8156 042074 005237 002276 INC UNITN s INCREMENT LOGICAL DEVICE NUMBER 
8157 042100 023737 002276 002012 CMP UNITN, LSUNIT ;SEE IF MAXIMUM UNIT NO. EXCEEDED 
ates 042106 002362 BGE NEWP AS 3;BR IF YES 
8160 042110 GPHARD UNITN,R1 ;GET P-TABLE POINTER INTO Ri 
042110 013700 002276 MOV UNITN,RO 
042114 104442 TRAP C$GPHRD 
042116 010001 MOV RO,R1 
8161 042120 BCOMPLETE 30$ ;BR IF DEVICE AVAILABLE 
042120 103401 BcS 30$ 
— 042122 000764 BR GETPRM :SKIP THIS DEVICE 
1 
8164 
8165 ;#eeeeeeee0% HARDWARE PARAMETER MOVING CODE seeccacccasecece 
8166 042124 012137 002300 30$: MOV CR1)+,CSRA sSTORE DHV11-M CSR ADDRESS IN DEV.REG.ADDRESS TABLE 
8167 042130 012102 MOV CR1)+,R2 ;GET THE RX INTERRUPT VECTOR ADDRESS. 
8168 042132 010237 002266 MOV R2,RXVECA sSTORE RX INT VECTOR ADDRESS. 
8169 042136 062702 000004 ADD 04,R2 sCALCULATE TX INTERRUPT VECTOR ADDRESS. 
8170 042142 010237 002270 MOV R2,TXVECA ;STORE TX INT VECTOR ADDRESS. 
8171 042146 012102 MOV (R1)+,R2 sREMOVE DATA FROM EMPTY P-TABLE SLOT. 
8172 042150 012737 000377 002272 MOV @MAPLNS,ACTLNS ;INDICATE THAT ALL POSSIBLE LINES ARE ACTIVE. 
8173 042156 112102 MOVB (R1)+,R2 ;REMOBE DATA FROM EMPTY P-TABLE SLOT. 
8174 042160 112737 000001 002274 MOVB #1,LOPBCK sFORCE INTERNAL LOOPBACK MODE 
vee 042166 112137 002275 MOVB C(R1)+,BRLEVL sSTORE OHV11-M INTERUPT BUS REQUEST LEVEL 
176 3¢ 
8177 5 CALCULTATE DEVICE REGISTER ADDRESSES,AND PUT THEM IN THE 
ao 3 DEVICE REGISTER ADDRESS TABLE. 
i we 
8180 042172 013701 002300 MOV CSRA,R1 sCOPY CSR ADDRESS 
8181 042176 005201 INC R1 sINCREMENT CSR ADDRESS 
8182 042200 005201 INC R1 ; COPY BY 2. 
8183 042202 012703 000007 MOV 67 ,.R3 ;SET UP REGISTER COUNT 
8184 042206 012702 002302 MOV @RBUFA,R2 ;GET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 
8185 042212 010122 12$: MOV R1,CR2)+ sSTORE REGISTER ADDRESS IN TABLE 
8186 042214 005201 INC R1 sINCREMENT REGISTER ADDRESS 
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INITIALIZE SECTION 


—— 


042216 
042220 
042222 


042224 
042230 
042234 
042240 
042242 
042244 
042246 


042246 


042252 


042256 
042262 
042264 
042272 


042272 
042272 
042272 


005201 
005303 
001373 


012700 
012701 
010037 
005020 
020001 
103775 


005037 


106427 


005737 
001403 
012777 


104411 
000000 


000240 


002446 
000100 140146 





INC R1 + BY 2,FOR THE NEXT DEVICE REGISTER. 
DEC R3 ;DECREMENT REGISTER COUNT 
BNE 12$ sLOOP IF NOT DONE 


3¢ 
:; Initialise the BMP code queue. 
g°- 


MOV @BMPCQB,RO sGET THE START ADDRESS OF THE QUEUE. 
MOV @BMPCQE ,R1 sGET THE END ADDRESS OF THE QUEUE. 
MOV RO ,BMPCQP sSET THE POINTER TO THE START OF THE QUEUE. 
143: CLR CRO)+ sCLEAR OUT THE CONTENTS OF THE QUEUE. 
CMP RO,R1 sCHECK IF END OF QUEUE HAS BEEN REACHED. 
BLO 14% sLOOP IF NOT ALL DONE. 
16$: 


ENDIT: CLR CTRLCF sCLR THE CTRL-C TEST ABORT FLAG. 


7° 
; Set the processor priority to disable all but LTC interrupts. 


MTPS @PRIOS 3SET PROCESSOR PRIORITY TO S. 
3¢ 
; Enable Line Time Clock if one is available. 
‘ TST CLKHRZ sCHECK FOR A LTC BEING PRESENT. 
BEQ 18$ sLTC PRESENT? NO, SKIP LTC ENABLE. 
MOV @BIT6,8CLKCSR ;YES, ENABLE THE LTC. 
18$: 
ENDINIT 
110027: 
TRAP CSINIT 
TNUM == 0 sINITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE. 





SEQ 0211 
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INITIALIZE SECTION 
8220 3 sehaialatataialaialaiaiaiateiainininaisiainiaisiaiaiiainniainisisinaainmmausinmaeinuadnsndecccccccnce re Per 
$202 ; VOHE . ATD 


‘ 
8224 F ad atadatahatahaialaialnialainiaiaiaiaiaisiaininininininininininininiainisinipinininninuinicinciocnactc CC EE 


SEQ 0212 


8228 -SBTTL AUTODROP SECTION 


3*¢ 
8232 ; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
8233 ; THE “ADR” FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
8234 ; SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
8235 ; DROPPED FROM TESTING. 
8236 oe 


8238 042274 BGNAUTO 
042274 L$AUTO: : 
8239 
8246 
8247 042274 ENDAUTO 
042274 L10030: 
042274 104461 TRAP C$AUTO 





—— 
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SEQ 0213 
AUTODROP SECTION 


8250 : edatahatahatabaialaialalalaialaiataiaisisiniaiaisinininininiainininisiniciaininininnieiainicieuieincicc PEPE PET 
8251 3 
8252 ; VOHE . CUC 


é 
8254 3 ehatadalahalabetalaialaialaialaiataiataaisisiaininininininininininisinisininininininin nip uinicirrindceii OO PE PTT 


8258 -SBTTL CLEANUP CODING SECTION 


+4 
8261 ; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
ak ; AFTER THE HARDWARE TESTS WAVE BEEN PERFORMED. 

37> 


8265 042276 BGNCLN 
042276 L$CLEAN: : 


8276 042276 005737 002362 TST CTRLCF ;DID WE GET HERE BY CTRL-C FROM TEST? 

8277 042302 001401 BEQ 2s sCTRL-C FROM TEST? NO, SKIP BUS RESET. 

8278 042304 BRESET sYES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 
042304 104433 TRAP C$RESET 

8279 042306 2s: 

8280 042306 005737 002446 TST CLKHRZ sSEE IF CLOCK WAS ENABLED 

8281 042312 001402 BEQ 3$ sIF NOT BRANCH 

8282 042314 005077 140120 CLR @CLKCSR 

8283 042320 3$: 

8284 042320 EXIT CLN 
042320 104432 TRAP CSEXIT 
042322 000002 -WORD L10031-. 


8298 -EVEN 
8300 042324 ENDCLN 


042324 L10031: 
042324 104412 TRAP C$CLEAN 





—— 
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SEQ 0214 
CLEANUP CODING SECTION 
8302 
ceen ;SSCSSKK SKS SSSA SA SSSA SS SKS SS SSK SSS SKS SSS KA SKA SK KK SSAA SSS SSAA ASS 
8 3 
ree] 3 VOHE . ORP 
3 
ood BAMA e CS SE SAA SAA Meas AAKAEK SHAS MS AA AA AK SCAN KAS SAA KMKM AAA KASAM ME 
8 
8309 
8310 
8311 -SBTTL OROP UNIT SECTION 
8312 
8313 3+e 
8314 ; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
8315 ; TO NO LONGER BE TESTED. 
8316 s-- 
8317 
8318 042326 BGNOU 
— 042326 L$DU:: 
8320 ; SSCLSCKSSKSSL SSA GSLSSSSSASSAASG Ss SKSSSAS SS ASKK AS ASKCSS SKS AKASAKA SSS eh we hel Mes 
8321 3 INSERT DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
8322 3 A “DROP” COMMAND OR A “DODU"” MACRO EXECUTION. THE PURPOSE 
8323 . OF THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A 
8324 UNIT HAS BEEN DROPPED. THIS SECTION IS OPTIONAL. 
8325 ; | SUSKSSSNS KKK NS NK KR KN NRK SNK SISOS SRR OM KNKNK nN 
8326 042326 PRINTF @DROP,RO sREPORT UNIT THAT HAS BEEN DROPPED. 
042326 010046 MOV RO,-CSP) 
042330 012746 042352 MOV #DROP, -C SP) 
042334 012746 000002 MOV #2,-(SP) 
042340 010600 MOV SP ,RO 
042342 104417 TRAP CSPNTF 
042344 062706 000006 ADD $6 ,SP 
ead 042350 000427 BR EDROP sBRANCH AROUND THE MESSAGE. 
8329 042352 045 101 040 DROP: -ASCIZ/#%A UNITSD68A DROPPED FROM FURTHER TESTING.#N/ 
042355 125 116 111 
042360 124 045 104 
042363 066 045 101 
042366 040 104 122 
042371 117 120 120 
042374 105 104 040 
042377 106 122 117 
042402 115 040 106 
042405 125 122 124 
042410 110 105 122 
042413 040 124 105 
042416 123 124 111 
042421 116 107 056 
042424 045 116 000 
8330 -EVEN 
8331 042430 EDROP: 
8332 
8333 042430 EXIT DU 
042430 000167 -WORD J$JMP 
042432 000000 L10032-2-. 
8334 
8335 


-— 
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OROP UNIT SECTION 
8336 042434 ENDDU 
042434 L10032: 
042434 104453 TRAP Cs0u 


SEQ 0215 


-— 
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DROP UNIT SECTION 


SEQ 0216 


8339 SESS S SSCS el eS tah atalaialalalatalaininininiaininisinnininisiiinii uti tit titi t ttt Tt ttt TTT TT hep ey 
8340 3 
8341 ; VOHE . ADD 


8343 , 5 SSS sis sis ah hk sg sgh sig sin sui a wn a ps ps sh vs se sg sed sek sg se we i i ns nh eh SS eh eh eh eh eS hh SS 


8347 -SBTTL ADD UNIT SECTION 


8349 3+ 
8350 ; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
8351 s TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
| ; TO THE TEST CYCLE. 

—_ 


8355 042436 BGNAU 
042436 L$AU:: 


8357 hal alalalalatalatahatahabatainlaladiatabaiabainiaininimaipinisaiaimaisaiaaieieaedeciieuioeccc TTT 
8358 3 INSERT ADD CODE HERE. THIS CODE WILL BE EXECUTED AFTER 

8359 ; AN “ADD” COMMAND. THE PURPOSE OF THIS CODE IS TO DO ANY 

8360 H HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 

8361 ; THIS SECTION IS OPTIONAL. 

8362 hal alalalalainlniahatalaialaiatalaiisinininininininininininniseisunanuhiri iit ti tt iB tT TT ttt th tt Mtn ny 


8364 042436 EXIT AU 
042436 000167 -WORD  J$JMP 
042440 000000 -WORD L10033-2-. 


8367 -EVEN 
8369 042442 ENDAU 


042442 L10033: 
. 042442 104452 TRAP C$AU 





—— 
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HARDWARE TEST 


8372 
8373 


—— 


042444 
042444 


042444 
042452 


042460 
042466 
042474 


042476 


000001 
012737 
012737 


013737 
012737 
005005 


005004 


005037 
013700 
012701 
004737 
103402 
052705 
042737 
050437 
010100 
013701 
004737 
103403 
052705 
000440 


012702 
013737 
012700 
012701 
004737 


- ADRA - 


000001 
177777 


000004 
041042 


002424 
002300 
042724 
030112 


100001 
000017 
042724 


002300 
030112 


100002 


000010 
002300 
042722 
042724 
030112 





002364 
002362 


002422 
000004 


042724 


042722 


-SBTTL HARDWARE TEST 


3+ 


FRRREEEEEEEEEEESEEEE DEES EEEE EE EE EEEEEEEDEEED ES OEEDEE ES EDEEEREEEEEDEDEEEEEREEEEE 


3% 


FRREARAAEREESEEEAAEREREEEAERAEESESEREEEEEEEEESEAEEEEEEEEEDEEEREDEAERADEEEEDREES 


- ADRA - 


- REGISTER ADDRESS TEST - 


This test verifies that the Q-bus can read and write to the OHV1i1 
device registers. 
attempts (If the DHV11 is at the wrong address, for example) the 
004 bus time-out trap is detected by this routine and an error 

is reported. 


If the DHV11 does not respond to the access 


Ti:: 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER. ¢ 
sINDICATE THAT WE ARE IN A TEST. 


7¢ 
; Set up to catch any 004 traps which occur: 


BGNTST 

TNUM == TNUM + 1 

MOV @TNUM, TSTNUM 
MOV @-1,CTRLCF 
MOV 804, TP4VEC 
MOV @TP4RTN, 804 
CLR RS 


sSAVE THE EXISTING 004 TRAP VECTOR. 
sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
sCLEAR THE ERROR FLAGS. 


7? 
; Set up for the initial iteration of the test loop: 


CLR 


R4 


sCLEAR THE LINE COUNTER. 


3;¢ 
i Here begins the loop to test the registers for a line. 
First test the CSR and set the IND.ADR.REG (I.A.R) field. 


$ 
ad 
2s: 


4$: 


#100001,R5 
#17,52$ 
R4,52$ 
R1,RO 
CSRA,R1 

PC ,CKTRAP 


6$ 
#100002,R5 
40$ 


sCLEAR THE 004 TRAP FLAG. 

sSET UP CSR AS THE CKTRAP MOVE SOURCE. 

sSET UP DESTINATION LOCATION FOR CKTRAP MOVE. 
sMOVE AND CHECK FOR TRAP. 

sIF_NO TRAP, BYPASS ERROR. 

sSET FATAL READ ERROR FLAGS. 

;sCLEAR THE I.A.R FIELD OF THE CSR DATA. 

sOR IN THE LINE COUNTER TO THE I.A.R FIELD. 


sUSE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 


sSET UP CSR AS THE CKTRAP MOVE DESTINATION. 
sMOVE AND CHECK FOR TRAP. 

sIF NO TRAP, BYPASS ERROR. 

sSET FATAL WRITE ERROR FLAGS. 

sEXIT AND REPORT FATAL ERROR. 


test each register for this line. 





sINIT REGISTER COUNTER TO 8. 
sINITIALIZE THE REGISTER POINTER. 


sSET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 


sSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 
sPERFORM THE MOVE, CHECK FOR TRAP. 


SEQ 0217 
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SEQ 0218 
HARDWARE TEST - ADRA - 
8428 042610 103402 BCS 10$ sIF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
8429 042612 052705 100001 BIS #100001,R5 ;SET FATAL READ ERROR FLAGS. 
8430 042616 010100 10$: MOV R1,RO0 sUSE OLD DEST AS SRC FOR CKTRAP MOVE. 
8431 042620 012701 042722 MOV #50$,R1 ;SET UP REGISTER AS THE DEST FOR CKTRAP MOVE. 
8432 042624 004737 030112 JSR PC, CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 
8433 042630 103402 BCS 12$ sIF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
8434 042632 052705 100002 BIS #100002 ,R5 ;SET FATAL WRITE ERROR FLAGS. 
8435 042636 005237 042722 12$: INC 50$ sINCREMENT THE REGISTER 
8436 042642 005237 042722 INC 50$ ; POINTER BY 2. 
8437 042646 005302 DEC R2 sCOUNT THE REGISTER. 
one 042650 001351 BNE 8$ ;LOOP TO TEST THE NEXT REGISTER ADDRESS. 
8440 3° 
Soak : Now we set up to test the next line, or to exit if we ere done. 
g= 
8443 042652 005204 INC R4 sINCREMENT THE LINE COUNTER. 
8444 042654 020427 000010 CMP R4, @NUMLNS sCOMPARE LINE COUNTER AGAINST NUMBER OF LINES. 
Beak 042660 002707 BLT 2s ;LOOP TO TEST THE NEXT LINE IF WE'RE NOT DONE. 
8447 
8448 ; “Bene checking device register addresses. 
044 ; Report any errors and exit. 
3° 

8451 042662 013737 002422 000004 403: MOV TP4VEC ,804 sRESTORE THE NORMAL 004 TRAP VECTOR. 
8452 042670 005705 TST R5 ;CHECK THE ERROR FLAGS. 
8453 042672 100015 BPL 60$ sEXIT ROUTINE IF NO ERRORS. 
8454 ; REPORT “DEVICE REGISTER ACCESS ERRORS” 
8455 042674 ERRDF 101,€M0103,ERO101; >>>>> ERROR @101 <<<cc, 

042674 104455 TRAP CSERDF 

042676 000145 -WORD 101 

042700 010727 -WORD €&M0103 
— 042702 024240 -WORD ERO101 
8457 042704 DODU UNITN ;DROP THIS UNIT FROM FUTHER TESTING. 

042704 013700 002276 MOV UNITN,RO 

042710 104451 TRAP Cs000uU 
8458 042712 005037 002362 CLR CTRLCF sINDICATE NO CTRL-C ABORT FROM TEST. 
8459 042716 DOCLN sABORT THIS SUB PASS. 

042716 104444 TRAP CSOCLN 
8460 042720 000402 BR 60$ 3 
8461 3+ 
aesk 3; Local storage. 
846 3° 
8464 042722 000000 50$: -WORD O sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
8465 042724 000000 52s: -WORD 0O sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
8466 042726 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
8467 042732 ENDTST 

042732 L10034: 

042732 104401 TRAP CSETST 





-— 
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HARDWARE TEST - MRSTA - 





SEQ 0219 








-SBTTL HAROWARE TEST - MRSTA - 
8470 $+ b666660600000020006600600 00000006 0000000000060600000000000006000000000000008 
8471 3% - Master Reset With Selftest Test - 
8472 3% This test verifies thet the Mester Reset bit will clear after e device 
8473 reset and the performance of the DUT ROM based selftest. 


















T2:: 

000002 TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
8478 042734 012737 000002 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (2) 
8479 042742 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
8480 042750 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
8481 042756 012737 010765 005470 MOV @EMO201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
peek 042764 012737 024562 005472 MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADORESS IN ERROR TABLE. 

3¢ 


8484 ; Wait up to 5 seconds for the DUT Mester Reset bit to cleer. 
























8486 042772 012701 011610 MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
8487 042776 012702 000040 MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 
8488 043002 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
8489 043004 013704 002300 MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
8490 043010 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ee 043014 103410 BCS 2s sSKIP TO RESET DUT IF MR CLEAR. 
3¢ 
8493 ; DUT Master Reset bit did not go clear. Device aay be stuck in some 
ee ; odd stete. Try to reset device with ea bus reset. 
g° 
8496 043016 BRESET sNO, TRY TO JOG DEVICE WITH BUS RESET. 
043016 104433 TRAP CSRESET 
8497 043020 004737 035740 JSR PC ,SKPSTS sTRY TO SKIP THE SELFTEST. 
8498 043024 012701 011610 MOV #5000. .R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
8499 043030 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
oer 043034 103016 Bcc 43 3GO REPORT ERROR IF MR BIT DID NOT CLEAR. 
‘ 3° F 
or ; Set the Master Reset bit and verify that it clears within the proper time. 
a2 
8504 043036 012701 011610 2s: MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
8505 043042 010214 MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
8506 043044 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
8507 043050 103010 BCC 4$ 3GO REPORT ERROR IF MR BIT DID NOT CLEAR. 
8508 043052 012702 011610 MOV #5000. ,R2 
8509 043056 160102 SUB R1,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
8510 043060 001413 BEQ 6$ 3GO REPORT ERROR IF MR CLEAR IMMEDIATELY. 
8511 043062 020227 000764 CMP R2,@500. 
8512 043066 002417 BLT 8$ 3GO REPORT ERROR IF MR CLEAR IN < 1/2 SECOND. 
8513 043070 000424 . BR 60$ sEXIT THE TEST WITHOUT ERROR. 


6514 3¢ 


eae ; Error reports: 
37 
8517 sReport MR bit would not clear efter e DUT rese 
8518 043072 012737 000311 005466 4%: MOV #201. ,ERRNBR 3SET THE ERROR NoeER IN ERROR TABLE. 
8519 043100 012701 011033 MOV @€M0202,R1 sSELECT ERROR MESSAGE. 
8520 043104 ERROR sREPORT ERROR. >>>>> ERROR @201 <<<<< 
043104 104460 TRAP CSERROR 
8521 043106 000415 BR 60$ sEXIT THE TEST. 
















HARDWARE TEST 


e523 

8524 043110 
8525 043116 
8526 043122 























8530 043126 
8532 043140 
















012737 
012701 


104460 
000406 
012737 
012701 
104460 
005037 


104401 


000312 


011206 


000313 
011351 


002362 
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- MRSTA - 


005466 6%: 





005466 83: 


60$: 


sReport MR bit cleer on eat efter DUT reset 
MO ERRNBR THE ERROR NUMBER IN ERROR TABLE. 


Vv @202., 
MOV @€M0203,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. 
BR 60$ sEXIT THE TEST. 


sReport MR clear within 1/2 second of DUT reset 





>>>>> ERROR @202 <<<<< 


TRAP 


MOV #203. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
>>>>> ERROR @203 <<<c< 


MOV @€M0204,R1 
ERROR sREPORT ERROR. 


CLR CTRLCF 
ENOTST 


sSELECT ERROR MESSAGE. 


L10035: 


TRAP 


sINDICATE THAT WE COMPLETED THE TEST. 


TRAP 


C#ERROR 





CSERROR 


CSETST 
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HARDWARE TEST 


r-— 





012737 


012701 
012702 
005003 
013704 
004737 
103410 


104433 
004737 
012701 
004737 
103024 


012701 
010214 
004737 
004737 
103007 
012702 
160102 
020227 
002415 
000431 


012701 
004737 
103416 





- MARSSTA - 


000003 
177777 
000001 
011530 
024562 


011610 
000040 


002300 
031726 


035740 
011610 
031726 


000310 


035740 
031726 


000310 
000012 


011300 
031726 





002364 
002362 
005464 
005470 
005472 


-SBTTL HAROWARE TEST - MRSSTA - 
3%* £06066666666 66666466 6060066 666606606666 60060666066666646466606466666666646666666664666 
34 - Master Reset With Skip Selftest Test - 
34 This test verifies that the Master Reset bit will clear efter a device 
34 reset and the skipping of the DUT ROM based selftest. 
34 
t-- SHOCKER ERAESEEEKASSA SHAE ESESEKEEASESASEAERESEEEDEEEKAAEKEREREEEREDEEEDEEEDEEE 
BGNTST 7 ' 
TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (3) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV ®EMO301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLC. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3¢ 
; Wait up to 5 seconds for the DUT Master Reset bit to clear. 
3° 


MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
MOV @BITOS,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCS 2$ sSKIP TO RESET DUT IF MR CLEAR. 


3° 
; DUT Master Reset bit did not go clear. Device may be stuck in some 
; odd state. Try to reset device with a bus reset. 


BRESET sNO, TRY TO JOG DEVICE WITH BUS RESET. 
TRAP CSRESET 
JSR PC, SKPSTS sTRY TO SKIP THE SELFTEST. 
MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
Bcc 6$ sGO REPORT ERROR IF MR BIT DID NOT CLEAR. 


3? 
; Set the Master Reset bit, try to skip the selftest, and verify that the 
; MR bit clears within 1/5 second. 


os 
2s: MOV #200. ,R1 sTIME-OUT VALUE IS 1/5 SECOND. 
MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 
JSR PC,SKPSTS ;TRY TO SKIP THE SELFTEST. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
Bcc 4s ;GO FIND OUT WHAT IS WRONG IF MR NOT CLEAR. 
MOV #200. ,R2 
SUB R1,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
CMP R2,410 
BLT 8$ 3GO REPORT ERROR IF MR CLEAR IN < 10 MS. 
BR 60$ sEXIT THE TEST WITHOUT ERROR. 
3° 
; MR did not clear within 1/5 second, see if it clears within 5 seconds. 
3° 
4$: MOV 64800. ,R1 ;TIME-OUT VALUE IS 5 SECONDS MINUS 1/5 SECOND. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
Bcs 10$ ;GO REPORT ERROR IF MR CLEARED FINALLY. 


3? 
; Error reports: 
as 


























CVDMEBO OHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 159-1 


SEQ 0222 
HARDWARE TEST - MRSSTA - 
8593 sReport MR bit would not cleer after a DUT re 
8594 043322 012737 000455 005466 63: MOV #0301. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
8595 043330 012701 011033 MOV €M0202,R1 sSELECT ERROR MESSAGE. 
8596 043334 ERROR sREPORT ERROR. >>>>> ERROR @0301 <<<<< 
043334 104460 TRAP CSERROR 
ood 043336 000415 BR 60$ sEXIT THE TEST. 
8599 sReport MR bit clear within 10 ms after DUT rese 
8600 043340 012737 000456 005466 83: MOV #0302. ,ERRNBR sSET THE ERROR NUMBER’ IN ERROR TABLE. 
8601 043346 012701 011573 MOV 0€0302,R1 sSELECT ERROR MESSAGE. 
8602 043352 ERROR sREPORT ERROR. >>>>> ERROR @0302 <<<«<< 
043352 104460 TRAP CSERROR 
4 043354 000406 BR 60$ sEXIT THE TEST. 
8605 sReport MR cleared between 1/5 second and 5 seconds of DUT reset. 
8606 043356 012737 000457 005466 10%: MOV @0303. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
8607 043364 012701 011733 MOV E€M0303,R1 sSELECT ERROR MESSAGE. 
8608 043370 ERROR sREPORT ERROR. >>>>> ERROR #0303 <<<<< 
sone 043370 104460 TRAP CSERROR 
aoe 043372 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
611 
8612 043376 ENDTST 
043376 L10036: 
043376 104401 TRAP CSETST 





-— 
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—— 


8614 
8615 





000004 
012737 
012737 
012737 
012737 
012737 


012701 


012737 
012701 


104460 
000406 


012737 
012701 


- RXCHRA - 


000004 
177777 
000001 
012112 
024562 


011610 
000040 


002300 


035740 
031726 


000006 


177476 
000201 


000621 
011033 


000622 
012161 





002364 
002362 
005464 
005470 
005472 


005466 


005466 





-SBTTL HAROWARE TEST - RXCHRA - 
jee SHEAR ESEEEEEEAEEEEEEAEEEEEEDDEEOOEEOEOEODOEOODEEEOOOEOEOEEEOOEEEOKEEEEEEEE 
3 - RBUF Register RX Character Field Test - 
34 This test verifies that the RX Character Field of the DUT RBUF register 
3* appears to be functioning correctly. This test uses the codes «hich 
34 should be in the FIFO after a board reset and skip selftest sequence. 
3% 
t-- SEOEOEEREEEEEEOEEEEEOEEEEEEEOEEEEDEDOOEEEEEEODOOO6O440400400606000646040440008 

BGNTST os 

TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (4) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EM0401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3¢ 


; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
3; end wait up to 5 seconds for the MR bit to clear. 
g> 


MOV #5000. .R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT'S CSR. 

MOV R2,CR4) sSET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS sSKIP THE SELFTEST. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 44 sGO REPORT ERROR IF MR DID NOT CLEAR. 


3* 

+ Read 6 characters from the DUT and verify that they are valid selftest 
; codes. 

g- 


MOV (R4)+,RO sINCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 
MOV 6,R1 sINITIALIZE THE LOOP COUNTER. 
2s: oa ae sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 
MOV 2, 
BIC #177476,RO0 sREMOVE ALL BUT BITS SPECIFIC TO SELFTEST CODE. 
CMP RO,@201 sCHECK THAT BITS 0,6, AND 7 ARE CORRECT. 
BNE 6$ sGO REPORT ERROR IF CODE IS NOT SELFTEST CODE. 
DEC Ri sCOUNT THIS LOOP ITERATION. 
BNE 2$ sLOOP IF NOT ALL LINES DONE. 
BR 60$ sEXIT TEST, NO ERROR FOUND. 


3? 
; Error reports: 
i 
sReport MR bit would not cleer after a DUT reset. 


4$: MOV #0401. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0202,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #0401 <<<<< 
TRAP CSERROR 
BR 60$ s;EXIT THE TEST. 
iReport improper code found in DUT RBUF after reset (skip selftest). 
6$: MOV #0402.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0402,R1 s;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #0402 <<<<< 

























SEQ 0223 
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HARDWARE TEST 


66 
8670 043554 
8671 
8672 043560 


043560 
043560 


r-— 





SEQ 0224 
- RXCHRA - 
104460 TRAP CSERROR 
005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENOTST 
L10037: 
104401 TRAP CSETST 
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8674 
8675 
8676 


043700 
043706 
043712 
043712 
043714 


043716 
043724 
043730 
043730 


000005 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103013 


012400 
012701 
011402 
012700 
040200 
001012 
005301 
001371 
000415 


012737 
012701 


104460 
000406 
012737 
012701 


104460 


- RXFFDA - 


000005 
177777 
000001 
012331 
024562 


011610 
000040 


002300 


035740 
031726 


000010 
070000 


000765 


011033 


000766 
012377 


002364 
002362 
005464 
005470 
005472 


005466 


005466 





SEQ 0225 
-SBTTL HARDWARE TEST - RXFFDA - 
PERMIT TILi titi titi iii ti tit titi titi i it iT TT TTT Ti TTT ITT iT TT TTT TT Titi TT TT TTT Tt: 
34 - RBUF Register RX Flag Field Test - 
3% This test verifies that the Field of 3 flag bits in the RBUF reads 
3% as all ones when the Selftest codes are being read from the DUT 
3% after a board reset and skip selftest sequence. 
3% 
F-- SHSKSAEAKAKASAASAKAAKASESASERASASSERERASREEASSEKEREKAREAEALALEEESEEKREEEREREEEEER 
BGNTST - 
TNUM == TNUM « 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV #TNUM, TSTNUM ;SET UP THE TEST NUMBER. (5) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP 3SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EMOSO1,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3¢ 

; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
; and wait up to 5 seconds for the MR bit to clear. 

: Tad 


MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV @BITO5,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT‘S CSR. 

MOV R2,CR4) sSET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS sSKIP THE SELFTEST. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC as sGO REPORT ERROR IF MR DID NOT CLEAR. 


3¢ 

; Read 8 characters from the DUT and verify that all 3 RX error flags are 
; set for each characters. 

eg 


MOV (R4)+,RO sINCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 
MOV #8.,R1 sINITIALIZE THE LOOP COUNTER. 

2$: MOV (R4),R2 sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 
MOV #70000 ,RO 
BIC R2,R0 sCALCULATE BIT MAP OF CLEAR RX ERROR FLAGS. 
BNE 6$ sGO REPORT ERROR IF NOT ALL RX ERROR FLAGS SET. 
DEC R1 sCOUNT THIS LOOP ITERATION. 
BNE 2$ sLOOP IF NOT ALL LINES DONE. 
BR 60$ sEXIT TEST, NO ERROR FOUND. 


3* 
; Error reports: 
_ 


sReport MR bit would not clear after a DUT reset. 
4$: MOV #0501.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0202,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >2>>> ERROR #0501 <<<<< 
TRAP CSERROR 
BR 60$ ;EXIT THE TEST. 
sReport one or more RX error flags found set with selftest code. 
6$: MOV #0502.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0502,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #0502 <<<<< 


TRAP CSERROR 
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SEQ 0227 
HARDWARE TEST - RDAA - 
8733 -SBTTL HARDWARE TEST - RDAA - 
8734 eMC T ICI I ITI iti rit ti iii iii it ti Tit TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT 
8735 3% - CSR RX Date Available Bit Test - 
8736 3% This test verifies that the DUT CSR RX Date Available Bit is set by the 
8737 3% inclusion of the selftest codes in the DUT FIFO and that the bit sleeve 
dhe 34 after the FIFO has been emptied. 
7* 
8740 PMC EOO TPIT ri rr irri tir i rer iit titi tit t ttt TT TT TTT TTT TT TTT TTT TTT TT TTT TT TTT TT 
8741 043740 BGNTST 
043740 T6:: 
8742 000006 TNUM == TNUM ¢ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
8743 043740 012737 000006 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (6) 
8744 043746 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
8745 043754 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
8746 043762 012737 012737 005470 MOV #EM0601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
add 043770 012737 024562 005472 MOV ®ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
48 3+ 
8749 s Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
Lo ; and wait up to 5 seconds for the MR bit to clear. 
1 8° 
8752 043776 012701 011610 MOV #5000. ,R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 
8753 044002 012702 000040 MOV #BITOS,R2 sWAITING FOR MASTER RESET BIT. 
8754 044006 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
8755 044010 013704 002300 MOV CSRA,R4 ;BIT IS IN THE DUT’S CSR. 
8756 044014 010214 MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 
8757 044016 004737 035740 JSR PC ,SKPSTS sSKIP THE SELFTEST. 
8758 044022 004737 031726 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ah 044026 103016 BCC 4$ ;GO REPORT ERROR IF MR DID NOT CLEAR. 
6 3¢ 
de ; Check that the RX Data Available bit is set. 
62 3- 
8763 044030 032714 000200 BIT @BIT7,(R4) ;TEST THE DUT RX.DATA.AVAIL BIT. 
ane 044034 001422 BEQ 6$ 3GO REPORT ERROR IF BIT IS NOT SET. 
3¢ 
day ; Read characters from the DUT RX FIFO and wait for RX.DATA.AVAIL to go clear. 
§= 
8768 044036 012705 001130 MOV #600.,R5 sALLOW READING 600 CHARS BEFORE ERROR. 
8769 044042 010403 MOV R4,R3 
8770 044044 012300 MOV (R3)+,RO sCALCULATE THE RBUF ADDRESS. 
8771 044046 011300 2s: MOV (R3),RO ;READ A CHARACTER FROM THE RX FIFO. 
8772 044050 032714 000200 BIT @BIT7,(R4) sTEST THE DUT RX.DATA.AVAIL BIT. 
8773 044054 001427 BEQ 60$ sEXIT TEST WITHOUT ERROR IF RX.DATA.AVAIL CLR. 
8774 044056 005305 DEC RS ;COUNT THE CHARACTER JUST READ. 
8775 044060 001372 BNE 2$ ;LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 
Abe | 044062 000416 BR 8$ ;GO REPORT ERROR IF RX.DATA.AVAIL WOULDN'T CLR. 
8778 3¢ 
8779 ; Error reports: 
8780 $- 
8781 sReport MR bit would not clear after a DUT reset. 
8782 044064 012737 001131 005466 43: MOV #0601. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
8783 044072 012701 011033 MOV EM0202,R1 ;SELECT ERROR MESSAGE. 
8784 044076 ERROR sREPORT ERROR. >>>>> ERROR #0601 <<<<< 
044076 104460 TRAP CSERROR 
oo 044100 000415 BR 60$ s;EXIT THE TEST. 
8787 sReport that RX.DATA.AVAIL bit was not set after a reset completion. 





— 
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SEQ 0228 


8788 044102 012737 001152 005466 63: MOV #0602.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
8789 044110 012701 012773 MOV #€M0602,R1 sSELECT ERROR MESSAGE. 
8790 044114 ERROR sREPORT ERROR. >>>>> ERROR #0602 <<<<< 
044114 104460 TRAP CSERROR 
da 044116 000406 BR 60$ sEXIT THE TEST. 
8793 sReport that RX.DATA.AVAIL bit could not be cleared by purging FIFO. 
8794 044120 012737 001133 005466 83: MOV #0603.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
8795 044126 012701 013153 MOV #EM0603,R1 sSELECT ERROR MESSAGE. 
8796 044132 ERROR sREPORT ERROR. >>>>> ERROR #0603 <<<<< 
aver 044132 104460 TRAP CSERROR 
ke 044134 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
8800 044140 ENDTST 
044140 L10041;: 
044140 104401 TRAP CSETST 





-— 
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044142 
044142 


044142 
044150 
044156 
044164 
044172 


044200 
044204 
044210 
044212 
044216 
044220 
044224 
044230 


044232 
044234 
044236 


044240 
044244 
044246 
044250 
044252 
044254 


044256 
044264 
044270 
044270 
044272 


044274 
044302 


000007 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103012 


012400 
005714 
100016 


012705 
011400 
100027 
005305 
001374 
000416 


012737 
012701 


104460 
000415 


012737 
012701 





- RDVA - 


000007 
177777 
000001 
013336 
024562 


011610 
000040 


002300 


035740 
031726 


001130 


001275 
011033 


001276 
013373 


005466 


005466 





SEQ 0229 
-SBTTL HARDWARE TEST - ROVA - 
i++ RERROREEED EEE 6408044660 0004 04000004608 0006040040088 hhh hese eee 
3% - RBUF RX Date Valid Bit Test - 
3% This test verifies that the DUT RBUF RX Date Valid Bit is set by the 
;% inclusion of the selftest codes in the DUT FIFO and that the bit clears 
3% after the FIFO has been enptied. 
3% 
 Slelllacadaceadatenhdathehtn heheh Lehi LLL LLL TLL tite T iret TT TTT TTT TT TTT Ter 
BGNTST 
T7:: 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (7) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #EMO701,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3¢ 
; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
; and wait up to 5 seconds for the MR bit to clear. 
‘ MOV #5000. RI ;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
MOV R2,(R4) 3SET THE DUT MASTER RESET BIT. 
JSR PC,SKPSTS ;SKIP THE SELFTEST. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 4$ sGO REPORT ERROR IF MR DID NOT CLEAR. 
7¢ 
; Check that the RX Data Valid bit is set. 
g- 
MOV (R4)+,RO s INCREMENT POINTER TO PNT TO DUT RBUF REG. 
TST C(R4) sTEST THE DUT RX.DATA.VALID BIT. 
BPL 6$ 3GO REPORT ERROR IF BIT IS NOT SET. 
7+ 
; Read characters from the DUT RX FIFO and wait for RX.DATA.VALID to go clear. 
* Ta 
MOV #600.,R5 sALLOW READING 600 CHARS BEFORE ERROR. 
2s: MOV CR4),RO sREAD A CHARACTER FROM THE RX FIFO. 
BPL 60$ sEXIT TEST WITHOUT ERROR IF BIT IS CLEAR. 
DEC RS sCOUNT THE CHARACTER JUST READ. 
BNE 2s sLOOP IF NOT TOO MANY CHARS READ FROM FIFO. 
BR 8$ GO REPORT ERROR IF RX.DATA.VALID WOULDN'T CLR. 
;¢ 
; Error reports: 
ge 
sReport MR bit would not clear after a DUT reset. 
4$; MOV #0701. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0202,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0701 <<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
iReport that RX.DATA.VALID bit was not set after a reset completion. 
6$; MOV #0702. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0702,R1 ;SELECT ERROR MESSAGE. 
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8857 


044306 
044306 
044310 


044312 
044320 
044324 
044324 


044326 
044332 


044332 
044332 





104460 
000406 


012737 
012701 
104460 


005037 


104401 


- RDOVA - 


001277 005466 83: 


013553 


002362 


60$: 
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sREPORT ERROR. 
sEXIT THE TEST. 


sReport that RX.DATA.VALID bit could not be cleared b purgi 
MOV sSET THE ERROR NUMBER IN ERROR TABLE. 


ERROR 
BR 60$ 

#0703. ,ERRNBR 
MOV €M0703,R1 
ERROR 
CLR CTRLCF 
ENDTST 





sSELECT ERROR MESSAGE. 
sREPORT ERROR. 


sINDICATE THAT WE COMPLETED THE 


L10042: 





TRAP 


FIFO. 


TRAP 
TEST. 


TRAP 


>>>>> ERROR €0702 <<<<< 


CSERROR 


>>>>> ERROR @0703 <<<<< 


CSERROR 


CSETST 








SEQ 0230 
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SEQ 0231 
HARDWARE TEST - RLNA - 

8869 -SBTTL HARDWARE TEST - RLNA - 
8870 eMC OOOO IPT irri rir ri titi tii rit ii tt Titi TTT TTT TTT TTT TTT TTT TTT TTT TTT TT TTT 
8871 3% - RBUF RX Line Number Field Test - 
8872 3% This test verifies that the DUT RBUF RX Line Number field is working 
8873 3* correctly by utilizing the selftest codes which ere put in the RX 
rod 3* FIFO after a board reset. 

3% 
8876 eM CLIP TOIT ITI ri rrr rir ir it iii tit titi titi TTT TTT TTT TTT TTT TTT TTT TT TTT TT Te TTT 
8877 044334 BGNTST 

044334 T8:: 

8878 000010 TNUM == TNUM + 1 INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
887S 044334 012737 000010 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (8) 
8880 044342 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
8881 044350 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
oes | 044356 012737 013736 005470 MOV @EMO801,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

3¢ 
8884 ; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
aoe + and wait up to 5 seconds for the MR bit to clear. 

ge 
8867 044364 012701 011610 MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
88°3 044370 012702 000040 MOV @BIT05 ,R2 sWAITING FOR MASTER RESET BIT. 
8889 044374 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
8890 044376 013704 002300 MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
8891 044402 010214 MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
8892 044404 004737 035740 JSR PC,SKPSTS sSKIP THE SELFTEST. 
8893 044410 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
coon 044414 103016 BCC as 3GO REPORT ERROR IF MR DID NOT CLEAR. 

3¢ 
8896 s Read characters from the DUT RX FIFO and verify that the line numbers ere 
8897 ; correct. 
ote ; One cheracter is read from the FIFO for each possible line on the DUT. 

‘7 
8900 044416 005001 CLR Ri sCLEAR THE LINE COUNTER. 
8901 044420 0124v0 MOV (R4)+,RO sINCREMENT POINTER TO PNT TO THE DUT RBUF REG. 
8902 044422 011402 2s: MOV C(R4),R2 sREAD A CHARACTER FROM THE DUT RX FIFO. 
8903 044424 010203 MOV R2,R3 
8904 044426 000303 SWAB R3 
8905 044430 042703 177760 BIC 4177760,R3 sREMOVE ALL BUT LINE NUMBER BITS. 
8906 044434 020301 CMP R3,R1 sCOMPARE WITH EXPECTED LINE NUMBER. 
8907 044436 001017 BNE 6$ sGO REPORT ERROR IF LINE NUMBERS DON'T MATCH. 
8908 044440 005201 INC Ri sINCREMENT THE EXPECTED LINE NUMBER. 
8909 044442 020127 000010 CMP R1, @NUMLNS sCOMPARE WITH NUMBER OF LINES ON DUT. 
8910 044446 001365 BNE 2s sLOOP UNTIL CODES FOR ALL LINES ARE READ. 
pose 044450 000423 BR 603 sEXIT TEST WITHOUT ERROR. 
91 
8913 3+ 
8914 ; Error reports: 
6915 3° 
8916 sReport MR bit would not cleer efter ea DUT reset. 
8917 044452 012737 001441 005466 43: MOV #0801.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
8918 044460 012737 024644 005472 MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
8919 044466 012701 011033 MOV #EM0202,R1 sSELECT ERROR MESSAGE. 
8920 044472 ERROR sREPORT ERROR. >>>>> ERROR @0801 <<<<< 

044472 104460 TRAP CSERROR 

pees 044474 000411 BR 60$ sEXIT THC TEST. 


8923 sReport thet RX Line Number field is wrong for selftest code. 














HAROWASE TEST 


8924 044476 
8925 044504 
8926 044512 
8927 044516 
044516 
8928 
8929 044520 
8930 


8931 044524 
044524 
044524 



















012737 
012737 
012701 
104460 


005037 


104401 


001442 
024562 
013776 


002362 


005466 
005472 
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- RLNA - 


#0802. ,ERRNBR 
€RO201, ERRBLK 
#€M0802,R1 


CTRLCF 


sSET THE ERROR NUMBER IN ERROR TABLE. 


sSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


sSELECT ERROR MESSAGE. 
sREPORT ERROR. 


sINDICATE THAT WE COMPLETED THE TEST. 


L10043: 


TRAP 


TRAP 


>>>>> ERROR #0802 <<<<< 


CSERROR 


CsETST 
















HARDWARE TEST 









000011 
012737 
012737 
012737 
012737 


012701 


012701 


104455 
001605 





000011 
177777 
000001 


001605 


005670 
000040 


002300 
031726 


035740 


000764 
030370 
032722 


002660 
002662 


014102 


t-- $O64660660606606660000006 6606 666000060060000060000000000000000000000000000008 


3° 
s Reset the DUT, skip the self-test. 


1¢ 
: tg Mester reset to cleer. Deley for 500 milli-sece before purging 
3 the fi 


3¢ 
s Report the error if eny BMP codes were found. 


3¢ 
s There io et leest one BHP code in the queve. Report the error. 
te error BMP CODE FOUND IN TEST nn, BHP CODE: nnannn” 


@EM0902 ,R1 
ERROF 0901,EM0901,ER9301 ; 
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- BMPCHK - 


-SBTTL HAROWARE TEST 

5¢% S6060060600060006000000600000006 0000 00000000000000000000000000000000000000008 
- BMP check Test - 

This test is used to verify that the DUT does not immediately feil 

the on-board beckground- 


succeeding tests. 


This test looks for BMP codes in the fifo for e set period immediately 
efter the self-test is skipped. 

Any BMP codes thet ere found ere saved on the queue end ere elso 
reported in this test. 


NTST 


MOV #1 ,ERRTYP 


MOV #0901. ,ERRNBR 


3° 
+ Weit up to 3 seconds for the DUT Mester Reset bit to cleer. 
f time-out occurs, then exit this test. 


MOV #3000. ,R1 
MOV @68ITOS .R2 
CLR R3 
MOV CSRA.R4 
JSR PC ,MSLGET 
50% 


MOV R2,(R4) 
JSR PC .SKPSTS 


ifo. 





SEQ 0233 





- BMPCHK - 






monitor progrem, and hence invelidete 









T9:: 
sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
3SET UP THE TEST NUMBER. (9) 
sINDICATE THAT WE ARE WITHIN A TEST. 

sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
3SET THE ERROR NUMBER. 







sTIME-OUT VALUE IS 3.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DUT'S CSR. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sABORT THE TEST IF MR DID NOT CLEAR. 







sSET THE DUT MASTER RESET BIT. 
sWRITE THE SKIP SELFTEST CODES TO THE DUT. 













sTIME-OUT VALUE IS 500 MILLI-SECONDS. 
sWAIT FOR BMP TO BEGIN EXECUTION. 

sPURGE THE FIFO, SAVING ANY BMP CODES. 
sABORT THE TEST IF THE FIFO DID NOT CLEAR. 









sGET THE CONTENTS OF THE POINTER TO THE BMP Q. 
sGET THE START ADORESS OF THE QUEUE. 

sSEE IF THE POINTER HAS MOVED FROM THE BASE. 
sEXIT NO CODES IN THE QUEUE. 







sPASS THE MESSAGE 10 BE REPORTED. 

>>>>> ERROR @0901 <<<<c, 
TRAP CeEROF 
-WORD 901 
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HARDWARE TEST 


8989 044660 012737 
8990 044666 004737 


8992 044672 005037 


044676 104401 


—— 








- BMPCHK - 

BR 60$ 
001606 005466 503: MOV #902. ,ERRNBR 
036106 JSR PC, TSABRT 
002362 60$: CLR CTRLCF 





ENDTST 


SEQ 0234 


-WORD EMO0901 
-WORD ER9301 









sSET >>>>> ERROR @0902 <<ccc, 
sREPORT NON-TEST RELATED ERROR. 


sINDICATE THAT WE COMPLETED THE TEST. 


L10044: 
TRAP CSETST 
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HAROWARE TEST 


—— 


045010 
045016 
045022 


045024 
045032 
045036 
045036 


000012 
012737 
012737 
012737 
012737 
012737 


012701 


012701 
010214 
004737 
004737 
103011 
020127 
003015 


012737 
004737 
000423 


012737 
012701 


104460 


- BMPCHK - 


000012 
177777 
000001 
014136 
024644 


005670 
000040 


002300 
031726 


000062 


035740 
031726 


000050 


001753 
034734 


001751 
014202 





002364 
002362 
005464 
005470 
005472 


005466 


005466 


SEQ 0235 


-SBTTL HARDWARE TEST - SKSELF - 
3° 06660006 6606606606006606666606460660666060606600060666 0604606 06660606606460664660664666608646 
74 - Skip Self-test Test - 
34 This test verifies that the DUT skips the self-test within the 
34 time allowed, and that the fifo contains the correct codes after its 
34 completion. 
3% 
t-- SESAHKESESSSEKASHESESASKASASEEEASAESAEHEAHASHEKEKARESHAEKEKEEEEEEEREREREEEDSE 

BGNTST $0; 

1 

TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (10) 

MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EM1001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSO3,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3° 

; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out occurs, then exit this test. 

a 


MOV #3000. Ri sTIME-OUT VALUE IS 3.0 SECONDS. 

MOV @BITOS,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT'S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 


ze 
; Determine if the DUT takes too short or too long a time to skip the self-test 
; Set-up e time-out of 50 milli-second, if MR is clear in less than 10 milli 


: -second, or greater than 50 milli-seconds, report the error. 
ee 
MOV #50. .R1 sTIME-OUT VALUE IS 50 MILLI-SECONDS. 
MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
JSR PC ,SKPSTS sWRITE THE SKIP SELFTEST CODES TO THE DUT. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 2s sGO REPORT ERR IF SKIPPING STEST TOOK TOO LONG. 
CMP R1,040 
BGT 43 :3GO REP ERR IF SELFTEST COMPLETED IN < 10 MS. 


3¢ 

; Self-test completed within 10 milli-sec to 50 milli-seconds. 

; Verify that the self-test codes in the fifo are “good” codes ,ie the DUT 
; successfully completed the self-test. 

; This subroutine reports errors with numbers >>>>> 1003 thru 1007 <<<<<, 


ge 
MOV #1003. ,ERRNBR ;SET ERROR NUMBER TO 1003. 
JSR PC ,.RSTRPT sCHECK SELF-TEST CODES IN THE FIFO. 
BR 60$ sEXIT TEST. 

3¢ 

; Error reports: 

| og 


sReport Skip Self-test took too neg 
2s: MOV #1001. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV £41002, R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @1001 <<<<< 


TRAP CSERROR 





HARDWARE TEST 


r-— 


045040 





000414 
012737 
012701 


104460 
000405 


012737 
004737 


005037 


104401 


SS So A 
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- SKSELF - 


001752 
014267 





BR 60$ sEXIT THE TEST. 
sReport Skip Self-test completed too soon. 

005466 43: MOV #1002. ,ERRNBR sSET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV 0€M1003, R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ~~ 

R 

BR 60$ sEXIT THE TEST. 

005466 50$: MOV #1003. ,ERRNBR ;SET ERROR NUMBER. 
JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 

60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 


ENOTST 
L10045: 








2 <<eee 


CSERROR 


CsETST 
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HARDWARE TEST 


-— 


045100 
045100 


045100 
045106 
045114 
045122 
045130 


045136 
045142 
045146 
045150 
045154 
045160 


045162 
045164 


045170 
045174 
045200 
045202 
045206 
045212 


045214 
045220 
045222 
045226 
045230 
045232 
045236 
045242 





000013 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
004737 
103044 


010214 
004737 


012701 
012702 
010203 
013704 
004737 
103020 


012701 


- SKSELF - 


035740 


000005 
020000 


002300 
031726 


000017 
031726 
000001 


020000 
031726 





002364 
002362 
005464 
005470 
005472 
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-SBTTL HARDWARE TEST - DFSKST - 
BB acacia bdbte dL Litt LLL LLL LLL LLL TTT TTT Tit TT Tit tT ttt 


34 - Diagnostic fail bit, skip self-test test - 
34 This test verifies that the diagnostic fail bit of the DUT, correctly 
3* changes state as the on-boared selftest is skipped. 
3* 
i-- SREERARESEEAEAESAR ASAE AEEEAAEREEEAAEAAEEEAEEAREAEEEAAEEAEEEEEEEEAREDEEEEEEE 
BGNTST 704 
TNUM == TNUM «¢ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM :SET UP THE TEST NUMBER. (11) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV E€M1101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADORESS IN ERROR TABLE. 


3* 
; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out occurs, then exit this test. 


#3000. ,R1 
@BITOS,R2 
R3 
CSRA,R4 
PC ,MSLGET 
50$ 


sTIME-OUT VALUE IS 3.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DUT'S CSR. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sABORT THE TEST IF MR DID NOT CLEAR. 


3° 
; Reset the DUT, skip the self-test. 


g° 
MOV 
JSR 


3¢ 


R2,(R4) 
PC,SKPSTS 


sSET THE DUT MASTER RESET BIT. 
sWRITE THE SKIP SELFTEST CODES TO THE DUT. 


; Set time out of 5 milli seconds, wait for Diag_fail bit to set. 
; If time-out occurs go report the error. 


3¢ 


#5,R1 
$BIT13,R2 
R2,R3 
CSRA,R4 
PC ,MSLGET 
4$ 


sTIME-OUT VALUE IS 5 MILLI-SECONDS. 
sWAITING FOR DIAGNOSTIC FAIL BIT. 

sWAITING FOR BIT TO SET. 

sBIT IS IN THE DUT’S CSR. 

sWAIT FOR DUT_CSR_OF BIT TO CLEAR. 

sIF DIAG_FAIL DID NOT SET, GO REPORT ERROR. 


; Set time-out of 15 milli-secs, wait for Diag_Fail to clear. 


; If time-out occurs 9° 
; Verify the Diag fail bit is in a stable state before continui 
s back if the state was transitory, using the remainder of the 1 
- 


#15. ,R1 
R3 

PC ,MSLGET 
as 


R1,R5 
#1,R1 
#B81T13,R3 
PC ,MSLGET 





report the error. 


Loop 
ms time-out. 


sTIME-OUT VALUE IS 15 MILLI-SECONDS. 
sWAITING FOR BIT TO CLEAR. 

sWAIT FOR DUT_CSR_OF BIT TO CLEAR. 
sIF DIAG_FAIL DID NOT CLEAR, GO REPORT ERROR. 
sSAVE THE REMAINING TIME-OUT VALUE. 

sSET TIME-OUT OF 1 MTLLI-SECOND. 

sWAIT FOR B=T TO SEi. 

sDOUBLE CHECK TO ELIMINATE NOISE PROBLEMS. 





SEQ 0237 
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SEQ 0238 
HARDWARE TEST - DFSKST - 
9122 045246 103016 BCC 60$ sEXIT IF DIAG_FAIL BIT STILL CLEAR. 
9123 045250 010501 MOV RS,R1 sPASS THE REMAINING TIME-OUT VALUE. 
Mey 045252 000762 BR 23 ;LOQOP TO CHECK AGAIN. 
3° 

9126 ; Error reports: 
9127 3° 
9128 sReport Diagnostic fail bit bad. 
9129 045254 012737 002115 005466 43: MOV #1101. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
9130 045262 012701 014606 MOV 9EM1205,R1 ;SELECT ERROR MESSAGE. 
9131 045266 ERROR sREPORT ERROR. >>>>> ERROR #1101 <<<<< 

045266 104460 TRAP CSERROR 
Mr 045270 000405 BR 60$ sEXIT THE TEST. 
9134 045272 012737 002116 005466 50$: MOV #1102. ,ERRNBR ;SET THE ERROR NUMBER FOR TSABRT RTN. 
pee 045300 004737 036106 JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 
Hoy 045304 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED A TEST. 
9139 045310 ENDTST 

045310 L10046: 

045310 104401 TRAP CSETST 





—— 
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SEQ 0239 
HARDWARE TEST - SELFTS - 
9141 -SBTTL HARDWARE TEST - SELFTS - 
9142 ERMC LOLI T ITI TIT t ert titi ti tit Titi TTT TTT TTT TTT TTT TTT TTT TT TT TTT TTT 
9143 34 - Self-test Test - 
9144 34 This test verifies that the DUT’s Self-Test executes within the 
9145 3% time allowed, and that the fifo contains the correct codes after its 
9146 3% completion. 
9147 18 
9148 OME TOT III ITI rir rit irri ii itt iti titi tit TTT TTT TTT TTT TT TT TTT TTT TTT TTT TT TT TTT TTT 
9149 045312 BGNTST 
045312 Tl2:: 
9150 000014 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9151 045312 012737 000014 002364 MOV @TNUM, TSTNUM 3SET UP THE TEST NUMBER. (12) 
9152 045320 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
9153 045326 012737 000001 005464 MOV #1,ERRTYP s;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
9154 045334 012737 014371 005470 MOV #EM1201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
oan 045342 012737 024644 005472 MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3¢ 
9157 ; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
aos ; If time-out occurs, then exit this test. 
159 s- 
9160 045350 012701 005670 MOV #3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 
9161 045354 012702 000040 MOV @BITOS,R2 sWAITING FOR MASTER RESET BIT. 
9162 045360 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
9163 045362 013704 002300 MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
9164 045366 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ee 045372 103062 BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 
166 3¢ 
9167 ; Determine if the Self-test takes too short or tor long a time to complete. 
9168 ; Set-up ea time-out of 3 second, if MR is clear in less than 1/2 second, or 
oer ; greater than 3 seconds, report the error. 
170 :- 
9171 045374 012701 005670 MOV #3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 
9172 045400 010214 MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 
9173 045402 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
9174 045406 103030 BCC as 3GO REPORT ERROR SELFTEST TOOK TOO LONG. 
9175 045410 012702 005670 MOV #3000. ,R2 
9176 045414 160102 SUB R1,R2 sCALCULATE @ OF MS SELFTEST TO COMPLETE. 
9177 045416 020227 000062 CMP R2,450. 
9178 045422 002431 BLT 6$ sSELFTEST SKIPPED? YES, GO REPORT ERROR. 
9179 045424 020227 000764 CMP R2,#500. 
roe 045430 002434 BLT 8$ ;GO REP ERR IF SELFTEST COMPLETED IN < 1/2 SEC. 
1 ie 
9182 ; Self-test completed within lsec to 3 seconds. 
cos ; Check the state of the Diagnostic Fail bit, report error if it is set. 
184 Th 
9185 045432 032714 020000 BIT #B1IT13,(R4) sDETERMINE IF THE DIAG_FAIL BIT IS CLEAR. 
9186 045436 001406 BEQ 2s ;SKIP ERROR REPORT IF BIT IS CLEAR. 
9187 sReport Diagnostic fail bit bad. 
9188 045440 012737 002264 005466 MOV #1204. ,ERRNBR ;SET ERROR NUMBER TO IN ERROR TABLE. 
9189 045446 012701 014606 MOV 9€M1205,R1 ;SELECT THE ERROR MESSAGE. 
9190 045452 ERROR ; >>>>> ERROR @1204 <<<<< 
seni 045452 104460 TRAP CSERROR 
3¢ 
9192 3 Verify that the self-test codes in the fifo are “good” codes ,ie the DUT 
9193 ; successfully completed the self-test. 
Po ; This subroutine reports errors with numbers >>>>> 1205 thru 1209 <<<<<, 
; — 








-— 
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HARDWARE TEST 


9196 
9197 


—— 


045454 
045462 


012737 
004737 
000431 


012737 
012701 


104460 
000422 
012737 
012701 
104460 
012737 
012701 


104460 
000405 


012737 
004737 


005037 


104401 


- SELFTS - 


002265 
034734 


002261 
014410 


002262 
014552 


002263 
014474 


002272 
036106 


002362 


005466 


005466 


005466 


005466 


005466 


2s: 


3¢ 





MOV #1205. ,ERRNBR ;SET ERROR NUMBER TO 1205. 
JSR PC .RSTRPT sCHECK SELF-TEST CODES IN THE FIFO. 
BR 60$ sEXIT TEST. 


; Error reports: 


3° 
4$: 


6$: 


50$: 


60$: 





sReport Self-test took too long to complete. 
MOV #1201.,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 


MOV #€M1202, Ri sSELECT ERROR MESSAGE. 

ERROR sREPORT ERROR. >>>>> ERROR #1201 <<<<< 
TRAP CSERROR 

BR 60$ sEXIT THE TEST. 


sReport Self-test did not execute after DUT reset. 
MOV #1202. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV 9EM1204,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #1202 <<<<< 
TRAP CSERROR 


sReport Self-test competed too soon. 
MOV $1203. ,ERRNBR sSET THE ERROR NUMBER IN THE ERROR TABLE. 


MOV #€M1203, R1 sSELECT ERROR MESSAGE. 

ERROR sREPORT ERROR. >>>>> ERROR #1203 <<<<< 
TRAP CSERROR 

BR 60$ sEXIT THE TEST. 

MOV #1210.,ERRNBR ;SET THE ERROR NUMBER FOR TSABRT RTN. 

JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 

CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 

ENDTST 


L10047: 
TRAP CSETST 
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HARDWARE TEST 


—— 


9226 
9227 


000015 
012737 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
004737 
103120 


010214 
004737 


- SELFTS - 


005670 
000040 


002300 
031726 


035740 
000764 
031726 


005466 
000010 


002302 
007402 
170001 
177777 


002364 
002362 
005464 
005470 
005472 
005466 


-SBTTL HARDWARE TEST 
B tt SHOREREREEEEEEEEEEESEERERED EDD DEDEDE EE EEDE ESOS 0600064600000040 00000000804 


- STFAIL - 


3% - Self-test fail test - 
3% This test verifies that the DUT will report selftest errors vie the 
3% fifo. And that the Diagnostic fail bit will indicate the error. 
34 This is accomplished vie a software ‘hook’ in the self-test, which 
3% forces a “Procl to ram error” to be placed in the fifo. 
3* 
 Flelllaachateeladadeadetecaceshenhehe hhh beth h LLL LLL TLL Litt TTT TTT TTT TTT TTT TTT terete tT 
BGNTST -_ 
TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV TNUM, TSTNUM sSET UP THE TEST NUMBER. (13) 
MOV 4-1, CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV €M1301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
MOV #1301. ,ERRNBR sSET ERROR NUMBER TO 1301. 


3¢ 


; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out ‘occurs, then exit this test. 


#3000. ,R1 
#BITOS ,R2 
R3 


CSRA,R4 
PC ,MSLGET 
50$ 


sTIME-OUT VALUE IS 3.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DUT’'S CSR. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sGO REPORT ERROR IF MR DID NOT CLEAR. 


3¢ 
; Reset the DUT, check for rom version 0. 
; If Version 0 is found then exit this test. 


ge 
MOV 
JSR 


2s: MOV 


4$: DEC 


7¢ 
; Reset the DUT, delay for 25 milli-seconds before writing the Fail_self_test 
; code to TBUFFCT register on channel 0. 


R2,(R4) 
PC ,.SKPSTS 
#500. ,R1 
PC ,MSLGET 
50$ 


RBUFA,R4 
(R4),R2 
50$ 


#7402 ,R2 
ae 0A POUR 
$ 





sRESET THE DUT. 

sSKIP THE SELFTEST. 

sPASS TIME-OUT VALUE OF S500 MILLISECS. 

sWAIT FOR MR BIT TO CLEAR. 

sGO REPORT ERROR IF TIME-OUT OCCURRED. 

sSET ERROR NUMBER TO 1302. 

sSET MAXIMUM READ COUNT. 

sCLEAR THE ROM VERSION O FLAG. 

sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
sREAD A CODE FROM THE FIFO. 

sGO REPORT ERROR IF THE FIFO IS EMPTY. 
sREMOVE THE LINE NUMBER AND PROC INDICATOR. 
sCOMPARE WITH ROM VERSION #0 CODE. 

sROM VERSION #0? NO, SKIP SETTING FLAG. 
sYES, SET THE ROM VERSION #0 FLAGS. 
sDECREMENT MAX READ COUNTER. 

sLOOP IF 8 CODES HAVE NOT BEEN READ. 

sCHECK THE ROM VERSION #1 INDICATOR. 

sROM VERSION O IN EITHER PROCESSOR? YES, EXIT. 





















SEQ 0241 
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SEQ 0242 


9282 045740 012777 000040 134332 MOV @BIT0S,8CSRA sSET DUT MASTER RESET BIT, SELECT CHANNEL 0. 
9283 045746 012704 000031 MOV $25. ,R4 sPASS DELAY PERIOD OF 25 MILLI SECS. 
9284 045752 004737 030370 JSR PC ,DELAY sWAIT FOR SELFTEST TO INITIALISE. 
cos 045756 012777 146314 134332 MOV #146314, 8TXBFCA ;WRITE THE FAIL SELF-TEST CODE TO TBUFFCT REG. 
3¢ 
9287 s Wait up to 2 seconds for the self-test to complete. 
cos ; If time-out occurs, then exit this test. 
a 
9290 045764 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 1303. 
9291 045770 012701 003720 MOV #2000. ,R1 sTIME-OUT VALUE IS 2.0 SECONDS. 
9292 045774 012702 000040 MOV #BITOS ,R2 sPASS THE BIT MAP OF THE BIT TO TEST. 
9293 046000 005003 CLR R3 sSET UP THE EXPECTED STATE. 
9294 046002 013704 002300 MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
9295 046006 004737 031726 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ooot 046012 103036 BCC 50$ sGO REPORT ERROR IF MR DID NOT CLEAR. 
3¢ 
9298 ; Verify the Eg nee fail bit is set, indicating the error. 
ois ; Report error if diagnostic fail bit is clear. 
g= 
9301 046014 005237 005466 INC ERRNBR s;SET ERROR NUMBER TO 1304. 
9302 046020 032714 020000 BIT $B1T13,(R4) sCHECK THE STATE OF THE DIAG_FAIL BIT. 
wey 046024 001425 BEQ 10$ sGO REPORT ERROR IF DIAG_FAIL BIT CLEAR. 
9 3+ 
9305 ; Remove the 8 self-test codes form the fifo, and verify that at least 
coet ; one is a Proci to ram error code (231). 
g= 
9308 046026 005237 005466 INC ERRNBR s;SET ERROR NUMBER TO 1305. 
9309 046032 012700 000010 MOV #8.,RO 3SET MAXIMUM READ COUNT. 
9310 046036 005001 CLR Ri sCLEAR THE CORRECT CODE COUNTER. 
9311 046040 013704 902302 MOV RBUFA,R4 sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
9312 046044 011402 6$: MOV C(R4),R2 sREAD A CODE FROM THE FIFO. 
9313 046046 100020 BPL 50$ sGO REPORT ERROR IF THE FIFO IS EMPTY. 
9314 046050 042702 007400 BIC #7400,R2 sREMOVE THE LINE NUMBER FROM THE CODE. 
9315 046054 120227 170231 CMPB = R2,4170231 sIS IT THE CORRECT ERROR CODE?. 
9316 046060 001001 BNE 8$ sSKIP NEXT INSTRUCTION, IF NOT A 231 CODE. 
9317 046062 005201 INC Ri sINCREMENT COUNTER. 
9318 046064 005300 8$: DEC RO sDECREMENT MAX READ COUNTER. 
9319 046066 001366 BNE 6$ sLOOP IF 8 CODES HAVE NOT BEEN READ. 
9320 046070 005701 TST R1 sWERE ANY 231 CODES FOUND?. 
9321 046072 001010 BNE 60$ ;YES, THEN EXIT. 
9322 046074 005237 005466 INC ERRNBR 3NO, SET ERROR NUMBER TO 1306 AND REPORT ERROR. 
9323 sReport Self-test error eaet bad. 
9324 046100 012701 014656 10$: MOV 9E€M1302,R1 ;SELECT ERROR MESSAGE. 
9325 046104 ERROR sREPORT ERROR. >>>>> ERROR <<<c< 
046104 104460 TRAP CSERROR 
cae 046106 000402 BR 60$ sEXIT THE TEST. 
2 
ene 046110 004737 036106 50$: JSR PC, TSABRT sREPORT NON-RELATED TEST ERROR. 
2 
any 046114 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
9331 
9332 046120 ENDTST 
046120 L10050: 
046120 104401 TRAP CSETST 





— 
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9346 000016 
9347 046122 012737 
9348 046130 012737 
9349 046136 012737 
9350 046144 012737 
9351 046152 012737 
9352 046160 005037 
9353 046164 012700 
9354 046170 004737 


9360 046174 004737 
9361 046200 103402 
9362 046202 000137 


9366 046206 005237 
9367 046212 012702 
9368 046216 013704 
9369 046222 010214 
9370 046224 011401 
9371 046226 042701 
9372 046232 020102 
9373 046234 001406 


9375 046236 012737 
9376 046244 005003 
9377 046246 005005 


046250 104460 
9379 046252 005302 
9380 046254 002362 


9386 046256 005237 
9387 046262 005003 
9388 046264 012704 


—— 


000016 
177777 
000001 
003101 
015311 
002650 
003452 
030214 


034530 
046324 


005466 
000017 
002300 


177760 


024736 


005466 
000002 


002364 
002362 
005464 
005466 
005470 


005472 





-SBTTL HARDWARE TEST - REGWRW - 

BB Ml acacetacattaetnetnhcehte ehhh bot ttt LLL LLL LLL TTT TTT TTT TTT TTT TTT Tt tt 
3% - Device Register Word Access Read and Write Test - 

3% 

s* This test verifies that the device registers can be read and written 

3* correctly using word accesses. 


34% 
i-- SRREERERESESESEEEEEE ED DEEEEEEEOEEEEEEEEEEEES ODED EEEEEEEEEKEEEEEEEEEREROEEDE 
BGNTST a 
TNUM == TNUM + 1 ;INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV  @TNUM,TSTNUM §;SET UP THE TEST NUMBER. (16) 
MOV = @-1, CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1, ERRTYP ;SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #1601.,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV @EM1604,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 


CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV @ERCNTB,RO 
JSR PC ,CLRi6W sCLEAR THE ERROR COUNTER TABLE. 


;* 
; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports errors >>>>> 1601 <<<<<, 

ge 


JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 

ecs .+6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 

JMP 60$ ;YES, EXIT THE TEST. 
3? 
; Verify read/write capability to indirect address field of CSR 
ad 

INC ERRNBR sSET THE ERROR REPORT NUMBER TO 1602. 

MOV #17,R2 ;SET LOOP COUNT. 

MOV CSRA,R4 ;GET CSR ADDRESS. 
2s: MOV R2,(R4) sWRITE COUNT TO CSR. 

MOV CR4),R1 sREAD BACK THE CONTENTS OF THE CSR 

BIC #177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 

CMP R1,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 

BEQ 4$ sIS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 

sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 

MOV @ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 

CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 

CLR RS sCAUSE REPORT OF LINE 0. 

ERROR 3 »>>>>> ERROR @ 1602 <<<<< 

TRAP CSERROR 

4$: DEC R2 sDECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 

BGE 2$ sLOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


; Write and verify 16 data patterns in all used bits of all registers on all 

; active lines. Before writing each pattern, clear ell the bits. 

3 REGTST routine reports errors with numbers »>>>> ERROR 1603 - 1605 KCCRC, 
7 


INC ERRNBR sSET THE ERROR NUMBER TO 1603. 
CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
MOV 02,R4 sINDICATE R/W ACCESS, CLEAR FIRST. 





SEQ 0243 





(a 
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9389 
9390 


- 


046270 


046274 
046302 
046304 
046306 


046312 
046320 
046324 
046330 
046330 
046330 


004.37 


012737 


012737 
004737 
005037 


104401 


- REGWRW - 
034140 


003106 005466 


034140 


003111 005466 


034502 
002362 


JSR 


PC ,.REGTST 


sWRITE AND VERIFY DATA PATTERNS. 


3¢ 
; Write and verify 16 date patterns in all used bits of ell registers on ell 


3¢ 


active lines. 


MOV 

CLR 

NEG 
JSR 


#1606. ,ERRNBR 
R3 


R4 
PC ,REGTST 


Before writing each pattern, set all the bits. 
REGTST routine reports errors with numbers 


>>>>> ERROR 1606 - 1608 <<<<<, 
sSET UP ERROR NUMBER FOR REGTST ROUTINE. 


sINDICATE THAT WORD ACCESSES ARE TO BE USED. 


sINDICATE R/W ACCESS, SET FIRST. 
sWRITE AND VERIFY DATA PATTERNS. 


; Print error summary reports if necessary. 
The following routine reports errors with number >>>>> ERROR @ 1609 <<<<< 


sSET UP ERROR NUMBER FOR NUXT RTN. 
sREPORT ERROR SUMMARY IF NECESSARY. 


60$: 


CLR 
ENDTST 


#1609. ,ERRNBR 
PC ,REPSMR 
CTRLCF 





sINDICATE THAT WE COMPLETED THE TEST. 


L10051: 





TRAP 


CSETST 








SEQ 0244 











HAROWARE TEST 






9459 046472 
9460 046476 
9461 046500 
9462 046504 





005466 


000061 
034140 
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005472 


SEQ 0245 


-SBTTL HARDWARE TEST - REGWRM - 

$¢¢ S0O0O0000006 0666000006 000006000000 0600000000060000000000460000000000000000008 
34 - Device Register Word Access Read/Modify/Write Test - 

3% 

s# This test verifies that the device registers cen be written correctly 

s# using word read/modify/write accesses. 

3% 

b-- S608606006060006 000006000000 60000000000000000000000000000000000000000000008 










BGNTST ian 

TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM,TSTNUM SET UP THE TEST NUMBER. (17) 

MOV = @-1, CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1, ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 






MOV #1701.,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV @EM1701,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 









CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV @ERCNTB,RO 
JSR PC .CLRi6W sCLEAR THE ERROR COUNTER TABLE. 






3¢ 

; Reset the DUT to a known state, do not remove the stetus codes from the fifo. 
s Cleer TX and RX interrupt enable bits in the CSR. 

: This subroutine reports errors >>>>> 1701 <<<<<, 

§° 

















JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS .+6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP 60$ sYES, EXIT THE TEST. 

3¢ 

+ Verify read/modify/write capability to indirect eddress field of CSR 

i> 
INC ERRNBR sSET THE ERROR REPORT NUMBER TO 1702. 
MOV #17,R2 sSET LOOP COUNT. 
MOV CSRA ,R4 sGET CSR ADORESS. 

2$: BIC #17, (R4) sCLEAR THE DUT CSR USING READ/MODIFY/WRITE. 
BIS R2,(R4) sWRITE COUNT TO CSR USING READ/MODIF Y/WRITE. 
MOV C(R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
BIC #177760,R1 sMASK OUT ALL BUT THE IND.ADOR.REG FIELD. 
CMP R1,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 





BEQ as sIS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 
sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).* 
MOV @ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE 









CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR RS sCAUSE REPORT OF LINE 0. 
ERROR 3 »>>>> ERROR @ 1702 <<<c< 
TRAP CSERROR 
4$; DEC Re sDECREMENT “OOP COUNT/IND.ADD.REG ADORESS. 







BGE 2s sLOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


3¢ 

i Write and verify 16 date patterns in ell used bits of ell registers on ell 

s ective lines using R/M/W. Before writing each pattern, cleer ell the bite. 
3 REGTST routine reports errors with numbers »>>>>> ERROR 1703 - 1705 C4CCC, 
i- 









INC ERRNBR sSET THE ERROR NUMBER TO 1703. 
CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
MOV #1,R4 sINDICATE R/M/W ACCESS, CLEAR FIRST. 






JSR PC .REGTST sWRITE AND VERIFY DATA PATTERNS. 
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9463 se 

9464 + Write and verify 16 date patterns in ell used bits of ell registers on ell 

9465 F ective lines using R/M/W. Before writing each pattern, set ell the bits. 

oeee ; REGTST routine reports errors with numbers »>>>>> ERROR 1706 - 1708 €4CCC, 
3° 

9468 046510 012737 003252 005466 MOV #1706. .ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

9469 046516 005003 CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 

9470 046520 005404 NEG R4 sINDICATE R/M/W ACCESS, SET FIRST. 

Hod 046522 004737 034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3¢ 

9473 + Print error summery reports if necessary. 

bed. 3 The following routine reports errors with number >>>>> ERROR @ 1709 <<<cc 
i- 

9476 046526 012737 003255 005466 MOV #1709. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 

9477 046534 004737 034502 JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 

9478 046540 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 

9479 046544 ENDTST 






046544 L10052: 
046544 104401 TRAP CsETST 
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9505 046620 004737 
9506 046624 103402 
9507 046626 000137 
9508 046632 012737 


9513 046640 012702 
9514 046644 013704 
9515 046650 110214 
9516 046652 111401 
9517 046654 042701 
9518 046660 020102 
9519 046662 001406 


9521 046664 012737 


9533 046704 005237 
9534 046710 012703 
9535 046714 012704 





024736 


005466 
177777 
000002 





002364 
002362 
005464 
005466 
005470 


005466 


005472 


-SBTTL HARDWARE TEST - REGBRW - 

FOF SHOHHHSHEASKEHEASKAAESESESEASASESEAEEEAEEEEEEEEEKEKEDEREREREEEEEEEDREEEEEEEESE 
s@ - Device Register Byte Access Read and Write Test - 

34 

s# This test verifies that the device registers can be read and written 

3*@ correctly using byte accesses. 


* 
ll COORASASEEESEEEEEDESEERESEEREAEDEEEEEEERERESEL ORES EERE ED EERE EEEEEEEESEEES 
BGNTST re 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (18) 
MOV @-1, CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #1801.,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV @EM1801,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 


CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV @ERCNTB,RO 
JSR PC ,.CLR16W sCLEAR THE ERROR COUNTER TABLE. 


3¢ 

; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR 

; This subroutine reports errors >>>>> 1801 <<<<<, 

g= 


JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS . +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP sYES, EXIT THE TEST. 


60$ 
MOV #1802. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 1802. 
3° 
; Verify read/write capability to indirect address field of CSR. 
; Use byte accesses. 
3- 


MOV #17,R2 sSET LOOP COUNT. 
MOV CSRA ,R4 sGET CSR ADORESS. 
2s: MOVB R2,(R4) sWRITE COUNT TO CSR. 
MOVB (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
BIC #177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
CMP R1,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 
BEQ 4s sIS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 


sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 
MOV @ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 


CLR R3 ;SET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR RS sCAUSE REPORT OF LINE 0. 
ERROR 3 »>>>> ERROR @ 1802 <<<<< 
TRAP CSERROR 
43: DEC R2 ;DECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 
BGE 2s ;LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


3° 
; Write and verify 16 date patterns in all used bits of all lower bytes of all 
3 registers on all active lines. Use READ/WRITE accesses. Before writing 
+ each pattern, clear all the used bits of all active registers. - 

3 REGTST routine reports errors with numbers »>>>> ERROR 1803 - 1805 <<<<<, 


INC ERRNBR ;SET THE ERROR NUMBER TO 1803. 
MOV -1 ..3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
MOV #2,R4 sINDICATE R/W ACCESS, CLEAR FIRST. 
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9536 046720 004737 


9543 046724 
9544 0467 
9545 046734 


9552 046740 
9553 046746 
9554 046750 
9555 046752 


9562 046756 
9563 046764 
9564 046766 


9569 046772 
9570 047000 
9571 047004 
9572 047010 
047010 
047010 





012737 
005403 
004737 


012737 
005403 
005404 
004737 


012737 
005403 
004737 


012737 
004737 
005037 


104401 


SEQ 0248 
- REGBRW - 
034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
ie 
; Write and verify 16 date patterns in ell used bits of all a ~ bytes of all 
s fegisters on all active lines. Use READ/WRITE accesses. fore writing 
; each pattern, clear all the used bits of all active registers. 
; REGTST routine reports errors with numbers »>>>>> ERR 1806 - 1808 <<<<<, 
hed 
003416 005466 MOV #1806. ,ERRNBR sSET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3¢ 
; Write and verify 16 date patterns in all used bits of all lower bytes of all 
; registers on all active lines. Use READ/WRITE accesses. Before writing 
3 each pattern, set all the used bits of all active registers. 
; REGTST routine reports errors with numbers »>>>>> ERROR 1809 - 1811 <<<<<, 
as 
003421 005466 MOV #1809. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
NEG R4 sINDICATE R/W ACCESS, SET FIRST. 
034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3° 
; Write and verify 16 data patterns in all used bits of all high bytes of all 
; registers on all active lines. Use READ/WRITE accesses. Before writing 
F each pattern, set all the used bits of all active registers. 
; REGTST routine reports errors with numbers »>>>> ERROR 1812 - 1814 <<<<<, 
003424 005466 . MOV #1812. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
034140 JSR PC,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3° 
; Print error summary reports if necessary. 
: The following routine reports errors with number >>>>> ERROR @ 1815 <<<<<« 
— 
003427 005466 MOV #1815. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 
034502 JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
002362 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENOTST 
L10053: 




























TRAP CSETST 
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SEQ 0249 
HARDWARE TEST - REGBRM - 
9574 -SBTTL HARDWARE TEST - REGBRM - 
9575 FOF SHHSSHSKSASSSASSHAEHKEEKAKHASEASSEKAKEKALHSSKEKESEAEKEEEKASEEEREAREEEEOEEEEDE 
po da 74 - Device Register Byte Access Read/Modify/Write Test - 
34 
9578 3# This test verifies that the device registers can be read and written 
+ a :# correctly using byte accesses in Read/Modify/Write mode. 
0 3* 
9581 F- > 0060060060606 66666606606666646664606606606046060600660606066 4606464046 066664664666606046644646604646 
9582 
9583 047012 BGNTST 
047012 T1?:: 
9584 000021 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9585 047012 012737 000021 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (19) 
9586 047020 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
9587 047026 012737 000001 005464 MOV #1,ERRTYP ;SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
9588 047034 012737 003555 005466 MOV #1901. ,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
9589 047042 012737 015502 005470 MOV @EM1901,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
9590 047050 005037 002650 CLR ERSMRF ;CLEAR THE ERROR SUMMARY FLAGS. 
9591 047054 012700 003452 MOV %ERCNTB,RO 
oe 047060 004737 030214 JSR PC, ,CLR16W ;CLEAR THE ERROR COUNTER TABLE. 
9 3° 
9594 ; Reset the DUT to a known state, do not remove the status codes from the fifo. 
9595 ; Clear TX and RX interrupt enable bits in the CSR. 
te ; This subroutine reports errors >>>>> 1901 <<<«<<, 
9597 :~ 
9598 047064 004737 034530 JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
9599 047070 103402 BCS +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
9600 047072 000137 047254 JMP 60$ sYES, EXIT THE TEST. 
pene 047076 012737 003556 005466 MOV #1902. ,ERRNBR sSET THE ERROR REPORT NUMBER TO 1902. 
3* 
9603 ; Verify read/write capability to indirect address field of CSR. 
9604 ; Use byte accesses. 
9605 :- 
9606 047104 012702 000017 MOV #17,R2 ;SET LOOP COUNT. 
9607 047110 013704 002300 MOV CSRA,R4 ;GET CSR ADDRESS. 
9608 047114 142714 000017 2s: BICB #17,(R4) sCLEAR THE DUT CSR USING READ/MODIFY/WRITE. 
9609 047120 150214 BISB R2,(R4) sWRITE COUNT TO CSR USING READ/MODIFY/WRITE. 
9610 047122 111401 MOVB (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
9611 047124 042701 177760 BIC #177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
9612 047130 020102 CMP R1,R2 s;CHECK FOR CORRECT DATA WRITTEN/READ. 
9613 047132 001406 BEQ as 31S EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 
9614 sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 
9615 047134 012737 024736 005472 MOV ®ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
9616 047142 005003 CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
9617 047144 005005 CLR RS s;CAUSE REPORT OF LINE 0. 
9618 047146 ERROR ; »>>>>> ERROR @ 1902 <<<c< 
047146 104460 TRAP CSERROR 
9619 047150 005302 4$: DEC R2 ;DECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 
aorr 047152 002360 BGE 2s ;LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 
1 :¢ 
9622 ; Write and verify 16 date patterns in all used bits of all lower bytes of all 
9623 3 registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 
9624 ; git each pattern, clear all the used bits of all active registers. 
— ; REGTST routine reports errors with numbers »>>>> ERROR 1903 - 1905 <<<<<,. 
6 i- 
9627 047154 005237 005466 INC ERRNBR ;SET THE ERROR NUMBER TO 1903. 
9628 047160 012703 177777 MOV #-1,R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 





-— 
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HARDWARE TEST - REGBRM - 





















SEQ 0250 


9629 047164 012704 000001 MOV #1,R4 sINDICATE R/M/W ACCESS, CLEAR FIRST. 
peas 047170 004737 034140 JSR PC ,REGTST s;WRITE AND VERIFY DATA PATTERNS. 

1 3+ 
9632 ; Write and verify 16 date patterns in all used bits of all high bytes of ell 
9633 s+ fegisters on all active lines. Use READ/MODIFY/WRITE accesses. Before 
9634 : yh h each pattern, clear all the used bits of all active registers. 
pena 3 REGTST routine reports errors with numbers >>>>> ERROR 1906 - 1908 <<<<<, 

6 $= 
9637 047174 012737 003562 005466 MOV #1906. ,ERRNBR s;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
9638 047202 005403 NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
need 047204 004737 034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 

0 3* 
9641 ; Write and verify 16 date patterns in all used bits of all lower bytes of all 
9642 3 registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 
9643 ; writing each pattern, set all the used bits of all active registers. 
ae ; REGTST routine reports errors with numbers »>>>>> ERROR 1909 - 1911 CCRC, 
964 :- 
9646 047210 012737 003565 005466 MOV #1909. ,ERRNBR s;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
9647 047216 005403 NEG R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
9648 047220 005404 NEG R4 sINDICATE R/M/W ACCESS, SET FIRST. 
io 047222 004737 034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 

0 3+ 
9651 ; Write and verify 16 data patterns in all used bits of all high bytes of all 
9652 3 registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 
9653 3 pati each pattern, set all the used bits of all active registers. 
come 3 REGTST routine reports errors with numbers »>>>>> ERROR 1912 - 1914 <<<<<. 
96 ad 
9656 047226 012737 003570 005466 MOV #1912. ,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
9657 047234 005403 NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
9658 047236 004737 034140 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
9659 3° 
9660 ; Print error summary reports if necessary. 
9661 + The following routine reports errors with number >>>>> ERROR @ 1915 «<<<<< 
9662 s° 
9663 047242 012737 003573 005466 MOV #1915. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 
9664 047250 004737 034502 JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
9665 047254 005037 002362 60$: CLR CTRLCF sINCICATE THAT WE COMPLETED THE TEST. 
9666 047260 ENDTST 

047260 L10054: 
047260 104401 TRAP CSETST 
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- IOBIT - 


HARDWARE TEST 


9676 047262 
047262 


9678 047262 
9679 047270 
9680 047276 
9681 047304 
9682 047312 


9688 047320 
9689 047324 


9693 047326 
9694 047332 
9695 047336 
9696 047340 
9697 047346 
9698 047352 
9699 047360 

047360 
9700 047362 
9701 047366 

047366 

047366 


—— 


000022 
012737 
012737 
012737 
012737 
012737 


004737 
103016 


017701 
032701 
001411 
012737 
012701 
012737 


104460 
005037 


104401 


000022 
177777 
000001 
003721 
015557 


034530 


132754 
000400 


003722 


015621 
024644 


002362 





005466 
005472 


-SBTTL HARDWARE TEST - IOBIT - 
3e¢ SHAERAREKASAEAEAAREEASAERERERAAREEASEEAAESEEEEAAEEARAREREEAEEEREREREEEEEDEERE 
34 - Device Register ID Bit Test - 
3% 
34 This test verifies that the DUT STAT register ID bit reads as clear. 
s 
ll RHERARARERESAEERESAAEREAERERERESEAAREAEAEEEEERESAAEAEAREREEEAEERELEREREREDSE 
BGNTST : 
18:: 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (20) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #2001. ,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 

MOV ®EM2001,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
;¢ 
; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 
; This subroutine reports errors >>>>> 2001 <<<<<, 


: JSR —" sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 


BCC sFATAL RESET ERROR? YES, EXIT THE TEST. 
3* 
; Read the STAT register ID bit and verify that it is clear. 
3° 

MOV @STATA,R1 sREAD THE STAT REGISTER CONTENTS. 

BIT $BIT8,R1 ;CHECK THE ID BIT. 

BEQ 60$ ;ID BIT CLEAR? YES, EXIT THE TEST. 

MOV #2002.,.ERRNBR ;NO, SET THE ERROR REPORT NUMBER TO 2002. 

MOV %€M2002,R1 s;GET THE PROPER ERROR MESSAGE. 

MOV ®EROSO3,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 

ERROR sERROR NUMBER >>>>> 2002 <<<<< 

TRAP CSERROR 

60$: CLR CTRLCF INDICATE THAT WE COMPLETED THE TEST. 

ENDTST 

L1i0055: 


TRAP CSETST 
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SEQ 0252 
HARDWARE TEST - NOTXDV - 
9703 -SBTTL HARDWARE TEST - NOTXDV - 
9704 Fo SHERAAARAEAEEREREEAEEEASSAAREAEEAEEEAAEASASEAAEEEEEREEEAEEEEAEEEERESEEEEERE 
9705 34 - No TX_DATA_VALID/No TX_ACTION Test - 
9706 34 This test verifies that if a date word is written without the 
9707 3% TX_DATA_VALID bit set, no TX_ACTION will be generated. 
9708 3* To ensure data is not accidentally transmitted, the test is performed 
ae 3% in internal loopback, and on all active lines. 
3* 
9711 F-- AHRRAAAEEAAEEAEAAEEEEEEEAAAEEARAEEAEREEEEAREARAEREEEESEEEREREDREEREEEEEED EOE 
9712 047370 BGNTST 
047370 T19:: 
9713 000023 TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9714 047370 012737 000023 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (21) 
_ 9715 047376 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

9716 047404 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
9717 047412 012737 004065 005466 MOV #2101.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
9718 047420 012737 015674 005470 MOV @EM2101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
ath 047426 012737 026440 005472 MOV ®ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 

20 ed 
9721 ; Reset the DUT to a known state, remove the status codes from the fifo. 
9722 ; Clear TX and RX interrupt enable bits in the CSR. 
9723 ; This subroutine reports error >>>>> 2101 <<<<<, 
9724 3° 
9725 047434 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
9726 047440 103054 BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 
a 047442 005237 005466 INC ERRNBR sSET THE ERROR NUMBER TO 2102. 

2 3+ 
9729 ; Set internal loopback on all active lines. 
9730 ; Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 
9731 ; 2 stop bits. = 
ak ; Disable transmitters on all active lines. 

;= 
9734 047446 013705 002272 MOV ACTLNS ,RS sPASS THE ACTIVE LINE BIT MAP. 
9735 047452 012700 000200 MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 
9736 047456 004737 0402506 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
9737 047462 012700 177670 MOV #177670,R0 sPASS THE LPR CONTENTS. 
9738 047466 004737 040324 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
9739 047472 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECS. 
9740 047476 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
9741 047502 004737 036352 JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL ACTIVE LINES. 
9742 i¢ 
9743 ; Test ell active lines individually. 
9744 ; Write a date word to the TXCHAR register with TX_DATA_VALID clear. 
9745 ; Verify no TX_ACTION is generated. 
9746 t- 
9747 047506 013705 002272 MOV ACTLNS ,R5 s;GET THE ACTIVE LINE BIT MAP. 
9748 047512 005004 CLR R4 ;CLEAR THE LINE NUMBER COUNTER. 
9749 047514 000241 2$: cLC s;CLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
9750 047516 006005 ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
oa 047520 103020 BCC 4$ 300 NOT TEST THE LINE IF IT IS INACTIVE. 
2 i¢ 

9753 ; Select the line under test. 
9754 ; Write date word (ASCII <LF>) to TXCHR register with the most significant 
i ; bit CTX_DATA_VALID) clear. 
9756 hg 
9757 047522 010477 132552 MOV R4,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
9758 047526 012777 000012 132546 MOV #12,8TXCHA sWRITE THE DATA WORD TO THE DUT'S TXCHAR REG. 





-— 
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HAROWARE TEST 


9759 
9760 
9761 
9762 
9763 
9764 
9765 
9766 
9767 
9768 
9769 
9770 
9771 


9772 
9773 
9774 
9775 
9776 
9777 
9778 
9779 
9780 
9781 


r-— 


047572 
047576 
047576 
047576 


012701 
013702 
004737 
103004 


010401 
012702 


104460 


005204 
005705 
001352 
000400 


005037 


104401 





SEQ 0253 
- NOTXOV - 
7+ 
; Wait for a TX_ACTION to be returned, report error if TX_ACTION found 
; before time-out occurs. 
a 
170002 MOV #170002,R1 sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 
002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
037740 JSR PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
BCC 4$ sSKIP ERROR REPORT IF TX-ACTION NOT FOUND. 
MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
015737 MOV #EM2102,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
:+“TX_ACT FOUND AFTER INVALID DATA WORD WRITTEN” 
ERROR ; >>>>> ERROR 04102 <<<<<, 
TRAP CSERROR 
3? 
; Verify all active lines have been tested. 
i- 
4$: INC R4 sINCREMENT THE LINE NUMBER COUNTER. 
TST R5 sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
BNE 2s sYES; BRANCH TO TEST THE NEXT LINE. 
BR 60$ 3NO; EXIT THIS TEST. 
002362 60$: outer CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
L10056: 


TRAP CSETST 
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SEQ 0254 
HARDWARE TEST - TXDVAL - 
9783 -SBTTL HARDWARE TEST - TXDVAL - 
9784 i t+ SRRRSEEEEEEEEE DEES EEERED EEE OD EE ODO EE OSES OE EEOE EE ODD OE OD OEEEDEEEEEEEEEEES 
9785 3% - TX_DATA_VALID/TX_ACTION Test - 
9786 3* This test verifies that if a data word is written to the TXCHAR register 
9787 3% with the TX_DATA_VALID bit set, a corresponding TX_ACTION will be 
9788 3% nerated. 
9789 7% © ensure date is not accidentally transmitted, the test is performed 
db 3% in internal loopback, and on all active lines. 
3* 
9792 F-~ SORREEREEEAAEEESEAERAEEEEEEEEAAEEEAAEAEAESEREAREAAARREAEREAREREALEER ES ERERE 
9793 
9794 047600 BGNTST 
047600 T20:: 
9795 000024 TNUM == TNUM ¢ 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9796 047600 012737 000024 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (22) 
9797 047606 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
9798 047614 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
9799 047622 012737 004231 005466 MOV $2201. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
9800 047630 012737 016033 005470 MOV #EM2201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
aes 047636 012737 026440 005472 MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
2 34 
9803 ; Reset the DUT to a known state, remove the status codes from the fifo. 
9804 ; Clear TX and RX interrupt enable bits in the CSR. 
9805 ; This subroutine reports error >>>>> 2201 <<<<<, 
9806 3° 
9807 047644 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
joo 047650 103066 BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 
3¢ 
9810 ; Set internal loopback on all active lines. 
9811 ; Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 
9812 ; 2 stop bits. 
a4 ; Disable transmitters on all active lines. 
814 8° 
9815 047652 013705 002272 MOV ACTLNS RS sPASS THE ACTIVE LINE BIT MAP. 
9816 047656 012700 000200 MOV #200 ,RO 3PASS THE LNCTRL CONTENTS. 
9817 047662 004737 040250 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
9818 047666 012700 177670 MOV #177670,RO0 sPASS THE LPR CONTENTS. 
9819 047672 004737 040324 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
9820 047676 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 
9821 047702 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
Meee 047706 004737 036352 JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL ACTIVE LINES. 
9 3¢ 
9824 + Test all active lines individually. 
9825 ; Write a data word to the TXCHAR seg! eter with TX_DATA_VALID set. 
9826 ; Verify that a corresponding TX_ACTION is generated. 
9827 3° 
9828 047712 013705 002272 MOV ACTLNS ,RS sGET THE ACTIVE LINE BIT MAP. 
9829 047716 005004 CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
9830 047720 012737 004232 005466 23: MOV $2202. ,ERRNBR ;SET THE ERROR NUMBER TO 2202. 
9831 047726 000241 CLE sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
9832 047730 006005 ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
Poot 047732 103032 BCC 8$ 300 NOT TEST THE LINE IF IT IS INACTIVE. 
4 i+ 
9835 ; Select the line under test. 
9836 ; Write data word (ASCII <LF>) to TXCHR register with the most significant 
eed ; bit CTX_DATA_VALID) set. 
ge 


—— 
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SEQ 0255 
HARDWARE TEST - TXDVAL- 
9839 047734 010477 132340 MOV R4,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
coat 047740 012777 100012 132334 MOV #100012,8TXCHA ;WRITE THE DATA WORD TO THE DUT’S TXCHAR REG. 
1 i¢ 
9842 ; Wait for a TX_ACTION to be returned, report error if no TX_ACTION 
peak ; found before time-out occurs. 
3° 
9845 047746 012701 170002 MOV #170002,R1 sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 
9846 047752 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
9847 047756 004737 037740 JSR PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
9848 047762 103403 BCS 4s sSKIP ERROR REPORT IF TX-ACTION FOUND. 
9849 047764 012702 016070 MOV #EM2202,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
9850 :+"NO TX_ACT FOUND AFTER VALID DATA WORD TX'D’. 
eens 047770 000411 BR 6$ 3GO REPORT THE ERROR. 
;* 
on : Verify TX_ACTION returned from correct line. 
_ 
9855 047772 005237 005466 4$: INC ERRNBR s INCREMENT ERROR NUMBER TO 2103. 
9856 047776 000302 SWAB R2 s;GET THE LINE NUMBER IN THE LOW BYTE. 
9857 050000 042702 177760 BIC #177760,R2 sCLEAR THE UNWANTED BITS. 
9858 050004 020204 CMP R2,R4 sIS IT THE CORRECT LINE NUMBER?. 
9859 050006 001404 BEQ 8$ sYES; SKIP THE ERROR REPORT. 
9860 050010 012702 016162 MOV #EM2203,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
9861 s “INCORRECT LINE @ RETURNED WITH TX_ACT” 
9862 050014 010401 6%: MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
9863 050016 ERROR ; >>>>> ERROR <<cc<, 
050016 104460 TRAP CSERROR 
9864 
9865 3+ 
cat ; Verify all active lines have been tested. 
g= 
9868 050020 005204 8$: INC R4 sINCREMENT THE LINE NUMBER COUNTER. 
9869 050022 005705 TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
cont 050024 001335 BNE 23 sYES; BRANCH TO TEST THE NEXT LINE. 
9872 050026 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
9873 050032 ENDTST 
050032 L10057: 
050032 104401 TRAP CSETST 








-— 
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SEQ 0256 
HARDWARE TEST - TXENBI- 
9875 -SBTTL HARDWARE TEST - TXENBI- 
9876 b+ RERREREEEE REDS 0400440600 0004 06000006 00000006 000000 06 00000000000000000000008 
9877 3% - TX_ENABLE (Inactive) Test - 
9878 3% This test verifies that when the line under test's TX_ENABLE bit is 
9879 3* clear, transmission will not take place on that line. 
eee 3% This test is performed in internal loopback, and on all active lines. 
1 3% 
9882 | lellacachatatecthtadahehteehet nh nt LLL tt LLL TLL TL TTT TT TTT TTT TTT TTT TTT TTT TTT t tT 
9883 
9884 050034 BGNTST 
050034 T2i:: 
9885 000025 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9886 050034 012737 000025 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (23) 
9887 050042 012737 177777 002362 MOV 4-1, CTRLCF sINDICATE THAT WE ARE IN A TEST. 
9888 050050 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
9889 050056 012737 004375 005466 MOV $2301. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
9890 050064 012737 016267 005470 MOV @EM2301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
a 050072 012737 026440 005472 MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
2 3¢ 
9893 ; Reset the DUT to a known state, remove the status codes from the fifo. 
9894 ; Clear TX and RX interrupt enable bits in the CSR. 
9895 ; This subroutine reports error >>>>> 2301 <<<<<, 
9896 8° 
9897 050100 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
te 050104 103110 Bcc 60$ sRESET FAILURE?, ABORT THIS TEST. 
3*¢ 
9900 ; Set internal loopback on all active lines. 
9901 + Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 
9902 i; 2 stop bits. 
40+ ; Enable transmitters on all lines. 
4 i- 
9905 050106 013705 002272 MOV ACTLNS ,RS sPASS THE ACTIVE LINE BIT MAP. 
9906 050112 012700 000200 MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 
9907 050116 004737 040250 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
9908 050122 012700 177670 MOV #177670,RO sPASS THE LPR CONTENTS. 
9909 050126 004737 040324 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
9910 050132 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 
9911 050136 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
9912 050142 012705 000377 MOV @MAPLNS,RS sPASS THE BIT MAP CORRESPONDING TO ALL LINES. 
9913 050146 004737 036446 JSR PC, TXENBL sENABLE TRANSMITTERS ON ALL LINES. 
9914 3+ 
9915 ; Test all active lines individually. 
oe ; Disable transmission on each active line. 
91 3° 
9918 050152 012703 000001 MOV #1,R3 sSET UP THE LINE BIT MAP FOR CHANNEL 0. 
9919 050156 005004 CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
9920 050160 012737 004376 005466 23: MOV #2302. ,ERRNBR ;SET THE ERROR NUMBER TO 2302. 
9921 050166 030337 002272 BIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
He. 050172 001447 BEQ 6$ sSKIP TESTING THIS LINE IF IT IS INACTIVE. 
3¢ 
9924 ; Clear the TX_ENABLE bit in TBUFFAD2 register. 
9925 ; Select the line under test. 
on | ; Verify it is clear, report error if set. 
| 
9928 050174 010305 MOV R3,R5 sPASS THE BIT MAP OF THE LINE UNDER TEST. 
9929 050176 004737 036352 JSR PC, TXDSBL sDISABLE TRANSMISSION ON THE LINE UNDER TEST. 
9930 050202 010477 132072 MOV R4,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 


-— 





CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 08-May-85 10:16 Page 177-1 


HARDWARE TEST 


9931 
9932 
9933 
9934 
9935 
9936 
9937 
9938 
9939 
9940 
9941 
9942 
9943 


- 


050206 
050212 


050310 
050310 


050312 
050314 
050316 


» 050320 


050324 


050326 
050332 
050332 
050332 


005777 
100433 


012737 
012777 
012701 
013702 
004737 
103016 


005237 
012701 
013702 
004737 
103405 
005237 
017702 
100004 


010401 
012702 


104460 


000241 
006103 
005204 
020427 
002715 


005037 


104401 





- TXENBI- 
132102 


004377 005466 
100012 132052 
170002 
002300 
037740 


005466 
070012 
002300 
037740 


005466 
132002 


016325 


000010 


002362 


TST 
BMI 


3? 


@TXAD2A 
As 





sVERIFY THE TX_ENABLE BIT IS SET. 
sGO REPORT ERROR IF TX_ENABLE BIT SET. 


; Write date word (ASCII <LF>) to TXCHR register. 
; Wait for a TX_ACTION to be returned, report error if e TX_ACTION 
; is found before time-out occurs. 


7* 
MOV 
MOV 
MOV 
MOV 

JSR 
BCC 


#2303. ,ERRNBR 
#100012, 8TXCHA 
#170002,R1 
CSRA,R2 

PC ,WAIBIS 

4$ 


sSET ERROR NUMBER TO 2303. 

sWRITE THE DATA WORD TO THE DUT’S TXCHAR REG. 
sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 

sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR TX_ACTION TO COME BACK. 

sGO REPORT ERROR IF NO TX-ACTION FOUND. 


3° 
; Wait for the date to appear in the fifo, report error if dete found. 


4$: MOV 


ERROR 


ERRNBR 
#70012,R1 
CSRA ,R2 
PC ,WAIBIS 
as 


ERRNBR 
ORBUFA ,R2 
6$ 


R4,R1 
€M2302,R2 


sSET ERROR NUMBER TO 2304. 

sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 
sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR RX_DATA_AVAILABLE TO SET. 

sREPORT ERROR IF DATA RECEIVED IN THE FIFO. 
sSET ERROR NUMBER TO 2305. 

sREAD THE DATA FROM THE FIFO. 

sSKIP ERROR REPORT IF DATA IS THERE. 


sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
sPASS THE MESSAGE TO BE REPORTED. 
:“TX_ENABLE BIT BAD ON LINE: an’. 
; >>>>> ERROR <<ccc, 
TRAP CsERROR 


3¢ 
; Verify all active lines have been tested. 


60$: CLR 





sCLEAR THE CARRY BIT PRIOR TO ROTATION. 
sSHIFT THE BIT MAP FOR THE NEXT LINE. 
sINCREMENT THE LINE NUMBER COUNTER. 
sHAVE ALL THE LINES BEEN TESTED?. 

sNO; BRANCH TO TEST THE NEXT LINE. 


sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10060: 
TRAP CsETST 
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HARDWARE TEST - TXENBA- 
9972 -SBTTL HARDWARE TEST - TXENBA- 
9973 5 O¢ SEOROEEE OOOO 460000 000000000000000006000000000000000000000000000000000000000 
9974 3% - TX_ENABLE (Active) Test - 
9975 34 This test verifies that when the TX_ENABLE bit is set in the epproriete 
9976 3% line register, transmission will teke plece on thet line. 
pod pe This test is performed in internel loopback, end on ell ective lines. 
3% 
9979 b-- S0OCO8000000000000000000000000000000000000000000000000000000000000000000008 
9980 
9981 050334 BGNTST 
050334 T22:: 
9982 000026 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
9983 050334 012737 000026 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (24) 
9984 050342 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
9985 050350 012737 000001 005464 MOV #1 ,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
9986 050356 012737 004541 005466 MOV #2401.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
9987 050364 012737 016363 005470 MOV @EM2401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
see 050372 012737 026440 005472 MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
3¢ 
9990 ; Reset the DUT to a known state, remove the stetus codes from the fifo. 
9991 s Cleer TX and RX interrupt enable bits in the CSR. 
4 | s This subroutine reports error >>>>> 2401 <<<<<, 
9 i- 
9994 050400 004737 030172 JSR PC ,.CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
io 050404 103127 Bcc 60$ sRESET FAILURE?, ABORT THIS TEST. 
3¢ 
9997 s Set internal loopbeck on ell ective lines. 
9998 s Set LPR on ell lines to 38.4k beud, 8 bits per cherecter, odd perity, 
8999 3: 2 stop bits. 
reeey ; Disable transmitters on all lines. 
s° 
10002 050406 013705 002272 MOV ACTLNS ,RS sPASS THE ACTIVE LINE BIT MAP. 
10003 050412 012700 000200 MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 
10004 050416 004737 040250 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
10005 050422 012700 177670 MOV #177670,R0 sPASS THE LPR CONTENTS. 
10006 050426 004737 040324 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
10007 050432 012704 000012 MOV #10. .R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 
10008 050436 004737 030370 JSR PC DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
10009 050442 012705 000377 MOV @MAPLNS RS sPASS THE BIT MAP CORRESPONDING TO ALL LINES. 
tf 050446 004737 036352 JSR PC. TXDSBL sDISABLE TRANSMITTERS ON ALL LINES. 
1 3¢ 
10012 + Test all ective lines individuelly. 
eee s Eneble transmission on each active line. 
i i- 
10015 050452 012703 000001 MOV #1,R3 sSET UP THE LINE BIT MAP FOR CHANNEL 0. 
10016 050456 005004 CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
10017 050460 012737 004542 005466 2%: MOV #2402. ,ERRNBR ;SET THE ERROR NUMBER TO 2402. 
10018 050466 030337 002272 BIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
cone 050472 001463 BEQ 8$ sSKIP TESTING THIS LINE IF IT IS INACTIVE. 
3¢ 
10021 : Select the line under test. 
10022 s Set the TX_ENABLE bit in TBUFFAD2 register. 
ions 3 Verify it ise set, report error if cleer. 
ge 
10025 050474 010305 MOV R3,RS sPASS THE BIT MAP OF THE LINE UNDER TEST. 
10026 050476 004737 036446 JSR PC, TXENBL sENABLE TRANSMISSION ON THE LINE UNDER TEST. 


10027 050502 012705 000012 MOV #10. .R5 sSET TXCHAR/LOOP COUNT TO 10. 
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010477 131566 MOV R4,@CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
005777 131576 TST @TXAD2A sVERIFY THE TX_ENABLE BIT IS SET. 
100045 BPL 6$ sGO REPORT ERROR IF TX_ENABLE BIT CLEAR. 


3¢ 

i Write dete word (ASCII <LF>) to TXCHR register. 

; Weit for ea TX_ACTION to be returned, report error if no TX_ACTION 
s found before time-out occurs. 


$ 
012737 #2403.,ERRNBR ;SET ERROR NUMBER TO 2403. 
#100012,8TXCHA ;WRITE THE DATA WORD TO THE DUT'S TXCHAR REG. 
#170002,R1 sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 
CSRA,R2 sPASS THE ADORESS OF THE REGISTER TO TEST. 
PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
6% sGO REPORT ERROR IF NO TX-ACTION FOUND. 


3° 
s Wait for the date to appeer in the fifo, report error if time-out. 


sSET ERROR NUMBER TO 2404. 
sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 
sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR RX_DATA_AVAILABLE TO SET. 
sREPORT ERROR IF NO DATA RECEIVED IN THE FIFO. 
RNBR sSET ERROR NUMBER TO 2405. 
131476 sREAD THE DATA FROM THE FIFO. 
6$ sGO REPORT ERROR IF THER IS’NT ANY DATA THERE. 
005466 sSET ERROR NUMBER TO 2406. 
R2 sPUT THE LINE NUMBER IN THE LOW BYTE. 
177760 sCLEAR THE UNWANTED BITS. 
R2,R4 sDID THE DATA COME FROM THE CORRECT LINE?. 
sNO; GO REPORT THE ERROR. 
sDECREMENT THE TXCHAR/LOOP COUNTER. 
sLOOP TO TX THE NEXT CHAR. 
sGO0 TEST THE NEXT LINE. 


sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
sPASS THE MESSAGE TO BE REPORTED. 
s“TX_ENABLE BIT BAD ON LINE: nn”. 
a >>>>> ERROR <<ccc, 
TRAP CSERROR 


1° 
s Verify ell ective lines heave been tested. 


ge 

R3.RS sPASS THE BIT MAP OF THE LINE UNDER TEST. 

PC, TXDSBL sCLEAR THE TX_ENABLE BIT ON THIS LINE. 
sCLEAR THE CARRY BIT PRIOR TO ROTATION. 

R3 sSHIFT THE BIT MAP FOR THE NEXT LINE. 

R4 sINCREMENT THE LINE NUMBER COUNTER. 

R4 , ONUMLNS sHAVE ALL THE LINES BEEN TESTED?. 

26 sNO; BRANCH TO TEST THE NEXT LINE. 


CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 


110061: 
TRAP CeeTsT 
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SEQ 0260 
HARDWARE TEST - INTA - 

10080 -SBTTL HARDWARE TEST - INTA - 

10081 JO MARMARA AAAERAREAAEAESHESERESEEEARAEEREREADEEAEEEEESESEEEEEEEEREEREEDEEEEES 

10082 34 - Interrupt Test - 

10083 34 This test verifies that the Device Under Test (DUT) will generate 

10084 34 reception and transmission interrupts correctly. This test does 

10085 34 not depend on the use of the serial line transmission or reception 

10086 34 capabilities of the DUT. The lines are put in internal loopback 

10087 34 to minimize any external effects that could be caused on devices 

10088 3¢ attached to the serial lines. 

10089 34 

10090 F-- SHRRAARARESAEAREAEEEEASAEEEREEAREEERERERAEEEESEREEEREEEEEDEDERDEREREEEED EES 

10091 

10092 050672 BGNTST 
050672 T23:: 

10093 000027 TNUM == TNUM ¢ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

10094 050672 012737 000027 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (26) 

10095 050700 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

10096 050706 012737 000001 005464 MOV #1,ERRTYP sSET ERROR FATAL ERROR TYPE IN ERROR TABLE. 

10097 050714 012737 003101 005466 MOV #1601. ,ERRNBR sSET FIRST ERROR REPORT NUMBER IN ERROR TABLE. 

10098 050722 012737 016417 005470 MOV @EM2601.,ERRMSG ;SET TEST ERROR MESSAGE IN ERROR TABLE. 

10099 3¢ 

10100 ; Reset the DUT to a known state, do not remove the status codes from the fifo. 

10101 ; Clear TX and RX interrupt enable bits in the CSR. 

10102 ; This subroutine reports errors from >>>>> 2601 thru 2602 <<<<<, 

10103 s- 

10104 050730 004737 034530 JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 

10105 050734 103402 BCS 23 sSKIP AROUND ABORTING TEST IF NO ERROR FOUND. 

10106 050736 000137 051676 JMP 603 sABORT TEST IF FATAL ERROR FOUND DURING RESET. 

aeeed 050742 012737 005053 005466 23: MOV $2603. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 2603. 

1010 3° 

10109 ; Enable transmitters on all lines. 

10110 3° 

10111 050750 012705 000377 4$: MOV @MAPLNS,RS sPASS ACTIVE LINE BIT MAP. 

eat | 050754 004737 036446 JSR PC, TXENBL sENABLE TRANSMISSION ON ALL LINES. 

1011 se 

10114 ; Test reception interrupts. 

10115 3 Set up for RX and TX interrupts: 

10116 ; RX interrupt service routine inputs a char and counts the interrupt. 

10117 ; TX interrupt service routine counts TX interrupts. 

10118 3- 

10119 050760 005037 002412 CLR RXINTC ;CLEAR THE RX INTERRUPT COUNTER. 

10120 050754 005037 002414 CLR RXINTF ;CLEAR THE RX INTERRUPT FLAGS. 

10121 050770 005037 002416 CLR TXINTC s;CLEAR THE TX INTERRUPT COUNTER. 

10122 050774 012737 004012 002360 MOV ®BUFBAS,BUFPTR ;LOAD THE BUFFER PTR WITH THE BUFFER BASE ADR. 

10123 051002 106427 000240 MTPS oPRIOS sDISABLE DEVICE In RRUPTS. 

10124 051006 SETVEC RXVECA,@RXINPT,@PRIOS ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
051006 012746 000240 MOV #PRIOS,-(SP) 
051012 012746 040734 MOV @RXINPT, -C SP) 
051016 013746 002266 MOV RXVECA, -(SP) 
051022 012746 000003 MOV @3,-(SP) 
051026 104437 TRAP CsSVEC 
051030 062706 000010 ADD #10,SP 

10125 051034 SETVEC TXVECA,@CACHTX,@PRIOS ;SET UP INTERRUPT VECTOR TO CATCH TX INT. 
051034 012746 000240 MOV @PRIOS, -(SP) 
051040 012746 040402 MOV @CACHTX, -( SP) 
051044 013746 002270 MOV TXVECA,-(SP) 
051050 012746 000003 MOV #3,-(SP) 
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051054 
051056 

10126 051062 

10127 

10128 

10129 

10130 

10131 

10132 051066 

10133 051072 

10134 051076 

10135 051102 

10136 

10137 

10138 

10139 

10140 051106 

10141 051112 

10142 

10143 

10144 

10145 051114 

10146 051120 

10147 051126 

10148 051130 

10149 051134 

10150 051142 

10151 051144 

10152 051150 

10153 

10154 

10155 

10156 051152 

10157 051156 

10158 051160 

10159 

10160 

10161 

10162 051164 
051164 
051166 
051170 
051172 

10163 

10164 

10165 

10166 051174 

10167 051200 

10168 

10169 051202 

20179 051206 
051206 
051210 
051212 
051214 

10171 

10172 





104437 
062706 
106427 


004737 
012704 
004737 
004737 


005737 
001017 


012701 
032777 
001416 
012701 
032777 
001410 
012701 
000405 


005737 
100006 
012701 


104455 
005053 
016417 
024644 


013702 
001406 


012701 


104455 
005054 
016417 
024670 





- INTA - 


000010 
000000 


002412 


016626 
000200 


016540 
100000 


016447 


002414 
016722 


002416 


012647 


131152 


131140 





TRAP CsSVEC 
ADD #10,SP 
MTPS @PRIOO sALLOW INTERRUPTS. 
3¢ 
sEnable reception interrupts. 
sDelay 4 ms to allow time for the interrupts to take place. 
sDisable reception interrupts. 


JSR PC ,RXIE1 sENABLE THE RECEPTION INTERRUPTS. 
MOV 04 ,R4 sPASS 4 MS COUNT TO THE DELAY ROUTINE. 
JSR PC ,DELAY ;DELAY 4 MILLI-SECON)S. 
JSR PC ,RXIEO sDISABLE RECEPTION INTERRUPTS. 
3¢ 
; Verify that the correct interrupts took place. 
; Test the int counter to verify that interrupts took place. 
ge 
TST RXINTC sCHECK THE RX INTERRUPT COUNT. 
BNE 6$ sSKIP THE FOLLOWING ERRORS IF COUNT <> 0. 
3° 
; Determine reason for no RX interrupts and print proper error message. 
56 
MOV #E€M2604 ,R1 sSET UP MSG IN CASE “RX.DATA.AVAIL IS CLR”. 
BIT @BIT7,8CSRA ;TEST THE RX.DATA.AVAIL BIT OF THE CSR. 
BEQ 8$ 3GO REPORT ERROR IF RX.DATA.AVAIL IS CLR. 
MOV #E€M2603,R1 sSET UP MSG IN CASE “DATA.VALID IS CLEAR”. 


BIT @BIT1S,@RBUFA ;TEST THE DATA.VALID BIT OF THE FIFO. 

8$ sGO REPORT ERROR IF DATA.VALID IS CLEAR. 
MOV @€M2602,R1 sSET UP MSG, “DATA.VALID IS SET”. 

8$ 3GO REPORT THE ERROR. 


3° 
; If RX ints occurred with RX.DATA.AVAIL clear, report the error. 
g° 


6$: TST RXINTF sCHECK THE RX INTERRUPT FLAGS. 
BPL 10$ sSKIP THE ERROR IF FLAG IS CLEAR. 
MOV #€M2605,R1 SET UP THE PROPER MESSAGE. 


3° 


; Report the error which has been found. 


8$: ERRDF 2603,€M2601,ER0503; >>>>> ERROR 82603 <<<<<, 
TRAP CSEROF 
-WORD 2603 
-WORD €EM2601 
-WORD EROSO3 


3? 
; Verify that no TX interrupts have been generated so far in this test. 


+. 
10$: MOV TXINTC ,R2 ;LOAD @ OF TX INTERRUPTS FOR EROSO4 RTN. 
BEQ 12$ ;SKIP ERROR IF NO TX INTERRUPTS. 
sREPORT “TX INTERRUPTS(S) RECEIVED WITH TX INTERRUPTS DISABLED. ” 
MOV #€M0526,R1 ;SET UP MESSAGE ADR FOR INDIRECT PRINT. 
ERROF 2604 ,EM2601,ERO0504; >>>>> ERROR @2604 <<<<<, 
TRAP CSEROF 


-WORD 2604 
-WORD  €EM2601 
-WORD EROSO4 





;* 


; Clean out the interrupt vectors used in this test. 






SEQ 0261 
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10173 
10174 
10175 


051216 
051222 
051222 
051226 
051230 
051230 
051234 


10176 


10177 
10178 
10179 
10180 
10181 
10182 
10183 
10184 
10185 
10186 


10187 


10209 





106427 


013700 
104436 


013700 
104436 


005037 
005037 
005037 


012746 
012746 
013746 
012746 
104437 
062706 


012746 
012746 
013746 
012746 
104437 
062706 
106427 


012705 
012701 
012702 
013704 
012703 
004737 
103020 
005003 
004737 
103005 
005305 
001365 


012701 
000402 
012701 


104455 
005055 
017005 
024644 
000424 


- INTA - 


000240 
002266 


002270 


002412 
002416 
002420 


000240 
040354 
002266 
000003 


000010 


000240 
041216 
002270 
000003 


000010 
000000 


000022 
000144 
100000 
002300 
100000 
032042 


032042 


017044 
017140 
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SEQ 0262 
t- 
12$: MTPS OPRIOS sDISABLE DEVICE INTERRUPTS. 
CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 
V RXVECA,RO 
TRAP CS$CVEC 
CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 
Vv TXVECA,RO 
TRAP CsCVEC 
3¢ 
3; Test transmission interrupts. 
F Set up for RX and TX interrupts: 
; RX interrupt service routine counts RX interrupts. 
; TX interrupt service routine counts the interrupt and sets flags. 
3- 
CLR RXINTC s;CLEAR THE RX INTERRUPT COUNTER. 
CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 
CLR TXINTF ;CLEAR THE RX INTERRUPT FLAGS. 
SETVEC RXVECA,@CACHRX,@PRIOS ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
MOV OPRTOS, -(SP) 
MOV @CACHRX, -( SP) 
MOV RXVECA, -(SP) 
MOV @3,-(SP) 
TRAP C$SVEC 
ADD #10, SP 
SETVEC TXVECA,@TXINTR,@PRIOS ;SET UP INT VECTOR TO TX INT ROUTINE. 
MOV @PRIOS,-(SP) 
MOV @TXINTR, -(SP) 
MOV TXVECA, -(SP) 
MOV @3,-(SP) 
TRAP CS$SVEC 
ADD #10,SP 
MTPS @PRIOO ;ALLOW INTERRUPTS. 
3;*¢ 
; Verify that the TX_ACTION bit is clear. 
3- 
MOV #18. ,R5 sINITIALIZE THE LOOP COUNTER. 
MOV #100. ,R1 ;SET 100 MS TIME-OUT. 
MOV #B1IT15,R2 sSELECT TX_ACTION BIT TO TEST. 
MOV CSRA,R4 sPASS DUT CSR AS THE WORD TO TEST. 
14$: MOV #B1IT15,R3 sWAIT FOR TX_ACTION TO BE SET. 
JSR PC ,MSLOOP sWAIT UP TO 100 MS FOR TX_ACTION SET. 
BCC 20$ sIF TIME-OUT, CONSIDER TX_ACTION CLEAR. 
CLR R3 sNOW, WAIT FOR TX_ACTION CLEAR. 
JSR PC ,MSLOOP ;WAIT UP TO 100 MS FOR TX_ACTION CLEAR. 
BCC 16$ ;IF TIME-OUT, REPORT TX_ACTION WON'T CLEAR. 
DEC R5 sDECREMENT THE TX_ACTION SET COUNTER. 
BNE 14$ ;LOOP IF NOT TOO MANY TX_ACTIONS FOUND. 


16$: 
18$: 


sREPORT “TX_ACTION SET REPEATEDLY AFTER RESET, NO DATA SENT.” 


MOV #E€M2607,R1 sSELECT ERROR MESSAGE. 
BR 18$ :GO TO REPORT THE ERROR. 
MOV $E€M2608,R1 ;SELECT TX_ACTION STUCK SET MSG. 
ERRDF 2605 ,EM2606,ERO503; >>>>> ERROR = 
. WORD 
. WORD 
. WORD 
BR 243 ;GO TO TEST WITH TX_ACTION SET. 


CSERDF 
2605 

EM2606 
EROSO3 
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HARDWARE TEST 


10210 
10211 
10212 
10213 
10214 
10215 
10216 
10217 
10218 
10219 
10220 
10221 
10222 
10223 


051424 
051430 
051434 
051440 
051444 
051446 
051452 
051456 
051460 


051464 
051464 
051466 
051470 
051472 


051474 
051500 


051504 
051510 
051514 
051520 
051524 


051530 
051534 
051540 


051544 
051550 


051554 
051560 


051562 
051566 
051572 
051574 





004737 
012704 
004737 
005737 
001413 
012701 
005737 
100002 
012701 


012705 
012700 
004737 
012700 
004737 


013701 
012702 
004737 


012704 
004737 


005737 
001007 


012701 
005777 
100407 
012701 


036574 
000062 
030370 
002416 


017044 
002420 


017211 


002416 
002420 


000377 
000200 
040250 
156430 
040324 


002302 
100000 
040300 


000372 
030370 


002416 


017270 
130506 


017362 



























SEQ 0263 


3¢ 
; Verify that no interrupts occur with TX_ACTION clear. 


= 
208: JSR PC, TXIE1 sENABLE TX_INTERRUPTS. 

MOV #50. ,R4 sPASS SO MS TIME TO THE DELAY ROUTINE. 

JSR PC ,DELAY sDELAY SO MILLI-SECONDS TO ALLOW INTS TO OCCUR. 
TST TXINTC sTEST THE TX INTERRUPT COUNT. 

BEQ 243 sSKIP THE ERROR IF NO TX INTERRUPTS. 

MOV €M2607,R1 sSELECT MESSAGE IN CASE TX INT FLAG CLEAR. 

TST TXINTF sTEST THE TX INTERRUPT FLAGS. 
BPL 22% sGO REPORT ERROR IF TX FLAG IS CLEAR. 


MOV #€M2609,R1 3TX FLAG IS p's SELECT PROPER ERROR MESSAGE. 
REPORT “TRANSMIT INTERRUPT TEST ERROR:. 


22$: ERRDOF 2606 ,EM2606,ERO503; >>>>> ERROR #2606 <<<<<, 
TRAP CSERDOF 
-WORD 2606 
-WORD EM2606 
-WORD EROSO3 


3*¢ 
; Prepare TX interrupt counter and flags. 


243: CLR TXINTC sCLEAR THE TX INTERRUPT COUNT. 
CLR TXINTF sCLEAR THE TX INTERRUPT FLAGS. 


; Set up line parameters for transmission. 


MOV @MAPLNS,RS sPASS ACTIVE LINES BIT MAP. 

MOV #200 ,RO sPASS INERT STATE, INTERNAL LOOPBACK. 

JSR PC ,WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 

MOV #156430,R0 ;SPECIFY 9600BPS,1STOP,NO PARITY ,8BITS/CHAR. 
JSR PC ,WTWLPR ;WRITE TO ALL LPR REGISTERS. 


3;* 
; Send a null char to each line. 
= 


MOV TXCHA,R1 ;SET UP TXCHAR REGISTER ADDRESS. 
MOV #100000, R2 ;SET CHARACTER TO BE TRANSMITTED = NULL. 
JSR PC ,WTWLNS ;SEND NULL CHAR TO EACH LINE. 
i+ 
; Delay 250 milli-seconds to allow interrupts to occur. 
"MOVs #250. .R4 ;SET UP FOR 250 MS DELAY. 
JSR PC ,DELAY ;WAIT 250 MS. 


3¢ 
; Verify that TX interrupts occurred. 


: TST TXINTC ;CHECK THE TX INTERRUPT COUNTER. 
BNE 26$ sSKIP THE FOLLOWING ERROR IF WE GOT TX INTS. 
3¢ 
; Determine the reason that we received no interrupts. 
iad 


MOV €M2610,R1 :SET UP MSG IN CASE “TX_ACTION IS SET”. 
TST @CSRA sCHECK THE DUT CSR 

BMI 28$ ;GO TO REPORT ERROR IF TX ACTION IS SET. 
MOV 9EM2611,R1 ;SET UP “TX_ACTION NOT SET” MESSAGE. 


3? 
; Check to verify that TX_ACTION was set for each interrupt. 
3° 
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SEQ 0264 
HARDWARE TEST - INTA - 

10263 051600 005737 002420 26%: TST TXINTF sCHECK THE TX INTERRUPT FLAGS. 

10264 051604 100006 BPL 30$ sSKIP ERROR IF TX_ACTION CLR FLAG IS CLEAR. 

teeny 051606 012701 017211 MOV 9E€M2609,R1 sSET UP TX INT WITH “TX_ACTION CLR” MSG. 

1 6 3+ 

eee ; Report “TRANSMIT INTERRUPT TEST ERROR:....” 

1026 3° 

10269 051612 28%: ERRDF  2607,EM2606,ER0503; >>>>> ERROR #2607 <<<<<, 
051612 104455 TRAP CSERDF 
051614 005057 -WORD 2607 
051616 017005 «WORD EM2606 
051620 024644 -WORD EROSO3 

10270 i¢ 

aaerk ; Verify that no TX interrupts have been generated so far in this test. 

;- 

10273 051622 013702 002412 30$: MOV RXINTC ,R2 ;LOAD @ OF RX INTERRUPTS FOR EROS04 RTN. 

10274 051626 001406 BEQ 32$ sSKIP ERROR IF NO RX INTERRUPTS. 

10275 051630 012701 012557 MOV #E€M0525,R1 ;SET UP MESSAGE ADR FOR INDIRECT PRINT. 

10276 sREPORT “RX INTERRUPTS(S) RECEIVED WITH RX INTERRUPTS DISABLED. ” 

10277 051634 ERRDF 2608,EM2606,ER0504; >>>>> ERROR #2608 <<<<<, 
051634 104455 TRAP CSERDF 
051636 005060 -WORD 2608 
051640 017005 -WORD EM2606 
051642 024670 -WORD EROS04 

10278 i+ 

rede ; Disable interrupts and clean out the interrupt vectors used in this test. 

;- 

10281 051644 005001 32$: CLR R1 ;CLEAR BOTH TRANSMITTER 

10282 051646 004737 036542 JSR PC, TXIEO : INTERRUPT ENABLE AND RECEIVER 

10283 051652 004737 035546 JSR PC ,RXIEO ; INTERRUPT ENABLE BITS IN THE DUT CSR. 

10284 051656 106427 000240 MTPS oPRIOS ;DISABLE DEVICE INTERRUPTS. 

10285 051662 CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 

051662 013700 002266 MOV RXVECA,RO 
051666 104436 TRAP CsCVEC 

10286 051670 CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 

051670 013700 002270 MOV TXVECA,RO 

—_ 051674 104436 TRAP CSCVEC 

1 

ee 051676 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

1028 

10290 051702 ENDTST 
051702 L10062: 

051702 104401 TRAP CSETST 

10291 





-— 
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10333 
10334 


10342 


051704 
051704 


051704 
051712 
051720 
051726 
051734 
051742 


051746 
051752 
051754 
051760 


051766 
051772 


000030 
012737 
012737 
012737 
012737 
012737 
005037 


004737 
103402 
000137 
012737 


012705 
004737 


106427 


012746 
012746 
013746 
012746 
104437 
062706 


012705 
012700 
004737 
012700 
004737 


- BRLEVA - 


000030 
177777 
000001 
005671 
017445 
002650 


034530 


052544 
005673 





002364 
002362 
005464 
005466 
005470 


005466 





-SBTTL HARDWARE TEST - BRLEVA - 

3¢¢ SEAR EEAEAEEESEEAEASE SEEKERS EASEEESEAEAAAAEAEEREAREREALELEAEERERERERDERE 
34 - BR Level Test B - 

3% This test verifies that the Device Under Test (DUT) will generate 

3% reception and transmission interrupts at the correct BR level. 

34 This test does not depend on the use of the serial line transmission 

3% or reception capabilities of the DUT. The lines are put in internal 

3* loopback to minimize any external effects that could be caused on 

3* devices attached to the serial lines. 


F-- SHRASEKAERESSAKAAEARESSEASEARARERAEEASAEREEREEEREEREREEEEEEEEEREEEDREREREERER 


BGNTST ‘ut 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ~=—Ss ; SET _UP THE TEST NUMBER. (30) 

MOV @-1,, CTRLCF ;INDICATE THAT WE ARE IN A TEST. 
MOV #1, ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #3001.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM3001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 


3¢ 

; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CS 

; This subroutine reports errors from >>>>> 3001 thru 3002 <<<<<, 


; = 
JSR _—, sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
$ ‘ 


BCS 3SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
JMP 60$ sABORT TEST IF FATAL ERROR FOUND DURING RESET. 
2$: MOV #3003. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 3003. 
3* 
; Enable transmitters on all lines. 
_ 
4$: MOV @MAPLNS,RS ;PASS ACTIVE LINE BIT MAP. 
JSR PC, TXENBL sENABLE TRANSMISSION ON ALL LINES. 


7¢ 
; Generate a transmission interrupt request. 
; Processor priority should be at 7 disabling ints. 


g= 
MTPS @PRIO7 sDISABLE ALL INTERRUPTS. 
SETVEC TXVECA,@TXINTR,@PRIO7 ;SET UP INTERRUPT VECTOR ee TX INT. 


SEQ 0265 


@PRIO7,-(SP) 


MOV @TXINTR, - 


(SP) 


MOV TXVECA, -(SP) 


MOV @3,-(SP) 
TRAP CS$SVEC 
ADD #10,SP 

3¢ 

; Set up DUT for transmission interrupts: 

; Set up internal loopback. 

; Set up line parameters for transmission. 

§:° 


MOV @MAPLNS RS sPASS ACTIVE LINES BIT MASK. 

MOV #200 ,RO sPASS INERT STATE, INTERNAL LOOPBACK. 

JSR PC ,WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 

MOV #156430,RO sSPECIFY 9600BPS,1STOP,NO PARITY,8BITS/CHAR. 
JSR PC ,WTWLPR sWRITE INTO ALL LPR REGISTERS. 
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SEQ 0266 
HAROWARE TEST - BRLEVA - 
10343 34 
eens : Send a null char to each line. 
10 
10346 052054 013701 002302 MOV TXCHA,R1 sSET UP TXCHAR REGISTER ADDRESS. 
10347 052060 012702 100000 MOV #100000, R2 s;SET CHARACTER TO BE TRANSMITTED = NULL. 
aoe 052064 004737 040300 JSR PC,WTWLNS ;SEND NULL CHAR TO EACH LINE. 
1 3¢ 
eeaty ; Delay 50 ms to allow time for the interrupt to be generated. 
lg 
10352 052070 012704 000062 MOV #50. ,R4 sPASS SO MS TIME TO THE DELAY ROUTINE. 
eee 052074 004737 030370 JSR PC ,DELAY ;DELAY 50 MILLI-SECONDS. 
;¢ 
eon ; Generate a reception interrupt request. 
3° 
10357 052100 SETVEC RXVECA,@RXBRRT,@PRIO7 ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
052100 012746 000340 MOV @PRIO7,-(SP) 
052104 012746 040500 MOV @RXBRRT, -( SP) 
052110 013746 002266 MOV RXVECA, -(SP) 
052114 012746 000003 MOV #3,-(SP) 
052120 104437 TRAP C$SVEC 
052122 062706 000010 ADD #10,SP 
10358 34 
reed ; Set up for the loop which tests the interrupt BR levels. 
1 t- 
10361 052126 012705 000340 MOV $340,R5 ;SET UP THE PRIORITY LEVEL TO 7. 
10362 052132 005003 CLR R3 s;CLEAR THE RX PRIORITY STORE AND FLAGS. 
cee 052134 005002 CLR R2 s;CLEAR THE TX PRIORITY STORE AND FLAGS. 
1 3+ 
10365 ; Enable TX and RX interrupts. 
aoe ; Processor priority should be at 7 disabling the interrupts. 
ge 
10368 052136 004737 035600 JSR PC ,RXIE1 sENABLE RECEIVER INTERRUPTS. 
one 052142 004737 036574 JSR PC, TXIE1 sENABLE TRANSMITTER INTERRUPTS. 
10370 3+ 
ears ; Loop, lowering the precessor priority until the DUT interrupts on RX and TX. 
1 3° 
10373 052146 005037 002416 6$: CLR TXINTC ;CLEAR THE TX INTERRUPT COUNTER. 
10374 052152 005037 002420 CLR TXINTF ;CLEAR THE TX INTERRUPT FLAGS. 
10375 052156 005037 002412 CLR RXINTC ;CLEAR THE RX INTERRUPT COUNTER. 
10376 052162 005037 002414 CLR RXINTF ;CLEAR THE RX INTERRUPT FLAGS. 
10377 052166 106405 MTPS RS ;SET PROCESSOR PRIORITY TO THE SELECTED VALUE. 
10378 052170 012704 000001 MOV #1,R4 sPASS 1 MS COUNT TO THE DELAY ROUTINE. 
onan 052174 004737 030370 JSR PC ,DELAY s;DELAY 1 MS TO ALLOW INTERRUPTS TO OCCUR. 
1 0 3¢ 
10381 ; Determine if any RX DUT interrupts occurred. 
ets | ; Log the processor priority for the RX interrupt if first RX int. 
10 8° 
10384 052200 005737 002412 TST RXINTC sCHECK THE RECEIVE INTERRUPT COUNTER. 
heed 052204 001412 BEQ 8$ ;SKIP THE PRIORITY LOG IF NO RX INT OCCURRED. 
6 :¢ 
rend ; If this is the first RX interrupt, log the priority. 
i es 
10389 052206 005703 TST R3 sCHECK THE RX PRIORITY STORE AND FLAGS. 
10390 052210 001010 BNE 8$ sGOTO TEST FOR TX INTS IF NOT THE FIRST RX INT. 
10391 052212 010503 MOV RS,R3 ;LOG THE PRESENT PRIORITY IN THE RX PRIO STORE. 
10392 052214 052703 100000 BIS $BIT15,R3 ;SET THE RX INT HAS OCCURRED FLAG. 
10393 052220 013700 002414 MOV RXINTF ,RO ;GET THE RX INTERRUPT ROUTINE FLAGS. 
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SEQ 0267 
HARDWARE TEST - BRLEVA - 
10394 052224 042700 137777 BIC #137777,R0 ;CLEAR ALL BUT THE TX INT ERROR FLAG. 
Seaes 052230 050003 BIS RO,R3 sIF TX INT ERROR, SET BIT 14 OF THE PRIO FLAGS. 
3¢ 
10397 ; Determine if any TX DUT interrupts have occurred. 
ete ; Log the present processor priority if this is the first TX interrupt. 
ge 
10400 052232 005737 002416 8$: TST TXINTC s;CHECK THE TRANSMIT INTERRUPT COUNTER. 
eee! 052236 001405 BEQ 10$ sSKIP THE PRIORITY LOG IF NO TX INT OCCURRED. 
3* 
eee ; If this is the first TX interrupt, log the priority. 
0404 ee 
10405 052240 005702 TST R2 sCHECK THE TX PRIORITY STORE AND FLAGS. 
10406 052242 100403 BMI 10$ sSKIP THE LOGGING IF NOT FIRST TX INTERRUPT. 
10407 052244 010502 MOV R5,R2 3LOG THE PRESENT PRIORITY IN THE TX PRIO STORE. 
ase 052246 052702 100000 BIS #BIT1iS5,R2 sSET THE TX INT HAS OCCURRED FLAG. 
3¢ 
10410 ; Select next processor priority. 
sneak ; Test for both RX and TX interrupts having occurred, loop if not. 
1041 s- 
10413 052252 162705 000040 10$: SUB #40,R5 s;DECREMENT PRIORITY LEVEL BY ONE. 
10414 052256 002402 BLT 12$ sGOTO CHECK FOR ERRORS IF BELOW PRIORITY ZERO. 
10415 052260 030203 BIT R2,R3 ;AND PRIO FLAGS TOGETHER, ALTER NONE OF THEM. 
eat 052262 100331 BPL 6$ ;LOOP IF RX AND TX INTS HAVEN'T BOTH OCCURRED. 
1 34 
very ; Disable interrupts and clear interrupt vectors. 
hed 
10420 052264 106427 000340 12$: MTPS #PRIO7 s;DISABLE ALL INTERRUPTS. 
10421 052270 CLRVEC RXVECA ;RETURN RX INT VECTOR TO UNUSED POOL. 
052270 013700 002266 MOV RXVECA,RO 
052274 104436 TRAP CsCVvEC 
10422 052276 CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 
052276 013700 002270 MOV TXVECA,RO 
052302 104436 TRAP CSsCVEC 
10423 34 
10424 ; Verify that RX and TX interrupts occurred, 
10425 ; at the proper BR level, and 
10426 ; im the proper order. 
ae ; Determine if TX interrupt occurred. 
104 3° 
10429 052304 005702 TST R2 sDETERMINE WHETHER TX INT OCCURRED OR NOT. 
cone 052306 100414 BMI 16$ sSKIP THESE ERRORS IF TX INT OCCURRED. 
i* 
oe ; Determine reason that no TX int occurred. 
1 s- 
10434 052310 012701 017270 MOV 9EM2610,R1 sSELECT “NO TX INT FROM TX.ACTION” MESSAGE. 
10435 052314 005777 127760 TST @CSRA s;CHECK THE TX.ACTION BIT OF THE DUT CSR. 
10436 052320 100402 BMI 14$ sSKIP TX.ACTION CLR MSG SELECTION IF IT IS SET. 
10437 052322 012701 017362 MOV #EM2611,R1 sSELECT “TX.ACTION CLEAR AFTER CHARS SENT” MSG. 
10438 sREPORT “INTERRUPT BR LEVEL TEST ERROR:” 
10439 052326 14$: ERRDF 3003,EM3001,ER0503; >>>>> ERROR #3003 <<<<<, 
052326 104455 TRAP CSERDF 
052330 005673 WORD 3003 
052332 017445 «WORD EM3001 
052334 024644 -WORD EROSO3 
ers 052336 000423 BR 18$ ;SKIP THE BR LEVEL CHECK, NO TX INT OCCURRED. 
3¢ 
10442 ; Verify that the TX interrupt was at the proper BR level. 
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10443 3° 

10444 052340 010204 16$: MOV R2,R4 sCALCULATE THE BR LEVEL 

10445 052342 042704 177400 BIC #177400,R4 : THAT THE TRANMSIT 

10446 052346 006204 ASR R4 : INTERRUPT WAS 

10447 052350 006204 ASR R4 ; REQUESTED AT, WHICH 

10448 052352 006204 ASR R4 ; IS ONE GREATER THAN 

10449 052354 006204 ASR R4 ; THE PROCESSOR PRIORITY 

10450 052356 006204 ASR R4 ; LEVEL AT WHICH THE 

10451 052360 005204 INC R4 : TRANSMIT INTERRUPT OCCURRED. 

10452 052362 113705 002275 MOVB BRLEVL,RS ;GET THE EXPECTED INTERRUPT BR LEVEL. 

10453 052366 120405 CMPB = R4,R5 sCOMARE THE INTERRUPT BR LEVEL WITH EXPECTED. 

10454 052370 001406 BEQ 18$ ;SKIP THE ERROR IF BR LEVEL IS CORRECT. 

10455 sREPORT “TX INTERRUPT GENERATED AT WRONG BR LEVEL: . 

10456 052372 012701 017572 MOV 9EM3003,R1 ;SELECT THE ERROR MESSAGE FOR THE ERROR CALL. 

10457 052376 ERROF 3004 ,EM3001,E€R3001; >>>>> ERROR #3004 <<<<<, 

052376 104455 TRAP CSEROF 
052400 005674 «WORD 3004 

052402 017445 «WORD €EM3001 
052404 025114 -WORD ER3001 

10458 3¢ 

——. ; Determine if RX interrupt occurred. 

1046 ‘= 

10461 052406 005703 18$: TST R3 sCHECK THE RX INT OCCURRED FLAG. 

oe 052410 100415 BMI 223 sSKIP THESE ERRORS IF RX INT OCCURRED. 

3* 

cease ; Determine reason that no RX int occurred. 

= 

10466 052412 012701 016447 MOV #EM2602,R1 ;SELECT "NO RX INT FROM TX.ACTION” MSG. 

10467 052416 032777 000200 127654 BIT #BIT7,8CSRA sCHECK THE RX.DATA.AVAIL BIT OF THE DUT CSR. 

10468 052424 001002 BNE 20$ sSKIP RX.DATA.AVAIL CLR MSG IF BIT IS SET. 

10469 052426 012701 017476 MOV #EM3002,R1 ;SELECT “NO RX.DATA.AVAIL AFTER RESET” MSG. 

10470 sREPORT “INTERRUPT BR LEVEL TEST ERROR: ” 

10471 052432 20$: ERRDF 3005,EM3001,ER0503; >>>>> ERROR #3005 <<<<<, 
052432 104455 TRAP CSEROF 
052434 005675 -WORD 3005 
052436 017445 WORD EM3001 
052440 024644 -WORD EROS5O3 

rete} 052442 000423 BR 243 3;SKIP THE BR CHECK IF NO RX INT OCCURRED. 

104 - 

oer ; Verify that the RX interrupt was at the proper BR level. 

1 = 

10476 052444 010304 22$: MOV R3,R4 sCALCULATE THE BR LEVEL 

10477 052446 042704 177400 BIC #177400,R4 ; THAT THE RECEIVE 

10478 052452 006204 ASR R4 ; INTERRUPT WAS 

10479 052454 006204 ASR R4 ; REQUESTED AT, WHICH 

10480 052456 006204 ASR Ro : IS ONE GREATER THAN 

10481 052460 006204 ASR R4 : THE PROCESSOR PRIORITY 

10482 052462 006204 ASR R4 ; LEVEL AT WHICH THE 

10483 052464 005204 INC R4 ; RECEIVE INTERRUPT OCCURRED. 

10484 052466 113705 002275 MOVB BRLEVL.RS ;GET THE EXPECTED INTERRUPT BR LEVEL. 

10485 052472 120405 CMPB 4,R5 s;COMARE THE INTERRUPT BR LEVEL WITH EXPECTED. 

10486 052474 001406 BEQ 243 ;SKIP THE ERROR IF BR LEVEL IS CORRECT. 

10487 sREPORT “RX INTERRUPT GENERATED AT WRONG BR LEVEL: .. 

10488 052476 012701 017646 MOV #EM3004,R1 ;SELECT ERROR MESSAGE FOR THE ERROR CALL. 

10489 052502 ERRDOF 3006 ,—EM3001,E€R3001; >>>>> ERROR @3006 <<<<<,. 

052502 104455 TRAP " CSERDF 
052504 005676 -WORD 3006 





SEQ 0268 
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SEQ 0269 





052506 017445 -WORD €&M3001 
052510 025114 -WORD ER3001 
10490 
10491 3+ 
rete | ; Test for interrupts occuring in the proper order. 
1 s° 
10494 052512 032703 040000 243; BIT *BIT14,R3 sCHECK THE IMPROPER INT ORDER ERROR FLAG. 
10495 052516 001406 BEQ 26% sSKIP ERROR REPORT IF ERROR DID NOT OCCUR. 
10496 sREPORT "TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT.” 
10497 052520 012701 017722 MOV #EM3005,R1 sSELECT THE ERROR MESSAGE FOR INDIRECT PRINT. 
10498 052524 ERRDF 3007,EM3001,ERO503; >>>>> ERROR @3007 <<<<<, 
052524 104455 TRAP CSERDF 
052526 005677 -WORD 3007 
052530 017445 «WORD €EM30C1 
052532 024644 «WORD EROSO3 
10499 i+ 
rene ; Clean up, exit the test. 
1 1 s- 
10502 052534 004737 036542 26$: JSR PC, TXIEO sCLEAR TRANSMITTER INTERRUPTS. 
10503 052540 004737 035546 JSR PC ,RXIEO sCLEAR RECEIVER INTERRUPTS. 
10504 052544 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
10505 052550 106427 000240 MTPS @PRIOS sDISABLE ALL BUT LTC INTERRUPTS. 
10506 052554 ENDTST 
052554 L10063: 
052554 104401 TRAP CSETST 
10507 


-— 
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SEQ 0270 


10509 -SBTTL HARDWARE TEST - DIABMP - 
10510 b+¢ SOROOREEOS 660606060460 00 040600000000 0000 08 000000000000 0008 00000000000000008 
10511 ;* - Diagnostic field (BMP) Test - 
10512 3% This test verifies that a request to the DUT to report BMP status 
10513 3* codes is complied with, within the specified time. 
10514 3* All active lines are tested. 
10515 i-- COCO OR06 640006 00000006 000000 06000000 00000006 000800040004 000400 EEE 
10516 
10517 052556 BGNTST 
052556 T25:: 
10518 000031 TNUM == TNUM ¢ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
10519 052556 012737 000031 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (31) 
10520 052564 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
10521 052572 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
10522 052600 012737 006035 005466 MOV $3101. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
10523 052606 012737 020014 005470 MOV @EM3101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
ao 052614 012737 026440 005472 MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
3¢ 
10526 ; Reset the DUT to a known state, remove the status codes from the fifo. 
10527 ; Clear TX and RX interrupt enable bits in the CSR. 
teed ; This subroutine reports error >>>>> 3101 <<<<<, 
1 ‘- 
10530 052622 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
coaae 052626 103077 Bcc 60$ sRESET FAILURE?, ABORT THIS TEST. 
3¢ 
10533 ; Test all active lines individually. 
10534 i Write the request code to the diagnostic field in the LPR register. 
pene ; Verify thet ea BMP code is returned within the correct time. 
ge 
10537 052630 013705 002272 MOV ACTLNS RS sGET THE ACTIVE LINE BIT MAP. 
10538 052634 005004 CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
10539 052636 013703 002300 MOV CSRA,R3 sGET THE ADDRESS OF THE DUT’S CSR. 
10540 052642 000241 23: Cur sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
10543 052644 006005 ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
oeaee 052646 103064 Bcc 8$ D0 NOT TEST THE LINE IF IT IS INACTIVE. 
3¢ 
10544 + Select the line under test. 
oo s Write the BMP request code to the DIAG field in the LPR register. 
go 
10547 052650 012737 006036 005466 MOV #3102. ,ERRNBR sSET THE ERROR NUMBER TO 3102. 
10548 052656 010413 MOV R4,CR3) sSELECT THE LINE CURRENTLY UNDER TEST. 
rene 052660 052777 000002 127416 BIS #2 ,QLPRA sWRITE THE BMP REQUEST CODE TO THE LPR. 
10 3¢ 
10551 + Wait for BMP request code to be cleared, report error if time-out 
ees 3; occurs. 
§° 
10554 052666 012701 010764 MOV #10764 ,R1 sTEST BIT 1, TIMEOUT OF SOO MILLI SECS. 
10555 052672 013702 002304 MOV LPRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
10556 052676 004737 037664 JSR PC ,WAIBIC sWAIT FOR REQUEST CODE TO CLEAR. 
oe 052702 103042 BCC 6$ sGO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 
3¢ 
10559 ; Weit for BMP code to appear in the fifo, report error if time-out 
10560 3; occurs. 
10561 s- 
10562 052704 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 3103. 
10563 052710 012701 070012 MOV #70012 ,R1 sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 
10564 052714 013702 002300 MOV CSRA,R2 sPASS THE ADORESS OF THE REGISTER TO TEST. 
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10565 052720 
10566 052724 


004737 
103031 


005204 


005037 


104401 


- DIABMP - 


037740 


005466 
127344 


005466 
170301 
005466 
177760 
000305 
035624 


020050 


002362 








oe _ sWAIT FOR RX_DATA_AVAILABLE TO SET. 


sGO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 
3¢ 


: Read the BHP code (if it is there) from the RBUF register. 

; Determine if it is e velid BMP code, 

s Verify the BMP code wes received from the correct chennel. 

s If the BMP code does not indicete DUT running ok, then seve it on 
3 the queve to be reported in e leter test. 


INC ERRNBR sSET ERROR NUMBER TO 3104. 
sGET THE BMP CODE FROM THE FIFO. 


BPL 6$ sGO REPORT ERROR IF NO BMP CODE FOUND. 

INC ERRNBR sSET ERROR NUMBER TO 3105. 

MOV #170301,R0 sSET-UP A BMP CODE MASK. 

BIC «RO sTRY TO CLEAR THE BMP MASK. 

BNE 6$ sGO REPORT ERROR IF IT IS NOT A VALID BMP CODE. 
INC ERRNBR sSET THE ERROR NUMBER TO 3106. 

MOV R2,RO sCOPY THE BMP CODE 


SWAB RO sPUT THE LINE NUMBER IN THE LOW BYTE. 

BIC #177760,R0 sCLEAR THE UNWANTED BITS. 

CMHPB = R4,,RO sD0ID THE BMP CODE COME FROM THE CORRECT LINE?. 
BNE 6$ sNO; GO REPORT ERROR. 

CMPB —— sIS THE BMP CODE A “GOOD ONE’?. 


BEQ sYES; SKIP SAVING THE BMP CODE ON THE QUEUE. 

JSR PC ,SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 

BR 8$ sGO SEE IF THERE ARE ANY MORE LINE TO TEST. 

MOV R4,R1 sPASS THE LINE NUMBER TO BE REPORTED. 

MOV #EM3102,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
;"BMP REQUEST BIT BAD ON LINE: ” 

ERROR ; >>>>> ERROR <<ccc, 


TRAP CSERROR 


3* 
; Verify ell ective lines heave been tested. 


INC R4 sINCREMENT THE LINE NUMBER COUNTER. 

TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
BNE 2s sYES; BRANCH TO TEST THE NEXT LINE. 

CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 





L10064: 


TRAP CsETST 
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10638 053116 


000032 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103141 


004737 


103107 
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- DIABMP - 


030172 


031342 


032722 


005466 







-SBTTL HARDWARE TEST 
54% SOORO8OD 0000 000000000000000000000000600000000000050000000006000000000000008 
38 - DMA Stert Bit Test - 


3% This test verifies that the DMA_START bit in tne DUT’s Line control 
3% registers will initiate DMA trenemission on the selected line. 
3% This test is performed in internel loopbeck, on ell active lines. 


- DMASTA - 


B-- 66664666660 60646 0606066 660600006000060006000008 006000 5066600006060006000000000000008 
BGNTST 


T26:: 
sINCREMENT THE yore TIME “—— 


@TNUM, TSTNUM sSET UP THE TEST NUMBER. 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1 ,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #4001.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM4001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3¢ 

+ Reset the DUT to ea known state, remove the stetus codes from the fifo. 
s Cleer TX end RX interrupt enable bits in the CSR. 

i This subroutine reports error >>>>> 4001 <«<<<, 

t- 


JSR PC ,CLNRST sRESET THE OHV11-M, REPORT ANY ERRORS FOUND. 
Bcc 50% sRESET FAILURE?, ABORT THIS TEST. 
JSR PC ,INDATP sINITIALSE THE 256 BYTE DATA PATTERN. 


3¢ 

s Set internal loopbeck,eneble receiver functions on ell ective lines. 
+ Set LPR on ell lines to 38.4k baud, 8 bits per character, odd perity, 
s 2 stop bite. 

s Eneble trenemitters on ell ective lines. 

ge 


MOV ACTLNS RS sPASS THE ACTIVE VINE BIT MAP. 

MOV #204 ,RO sPASS THE LNCTRL CONTENTS. 

JSR PC WT’ sINITIALISE THE LNCTRL REGISTERS. 

MOV #177670,R0 sPASS THE LPR CONTENTS. 

JSR PC .WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
JSR PC, TXENBL sENABLE TRANSMITTERS ON ALL LINES. 


3° 
s Set-up outer loop to test the OMA_START bit on ell ective lines. 
ae 


ACTLNS .RS sGET THE ACTIVE LINE BIT MAP. 
CLR Ri sCLEAR THE LINE NUMBER COUNTER 
24: MOV 04002..ERRNBR ;,SET THE ERROR NUMBER TC 
cic sCLEAR THE CARRY BIT PRIUR TO SHIFTING BIT MAP 
ROR RS sSHIFT THE BIT MAP INTO THE CARRY ‘ 
Bcc 148 100 NOT TEST THE LINE IF IT IS INACTIVE. 
JSR PC .PUF IFO sPURGE THE FIFO. 
Bcc 50s sGO REPORT ERROR IF FIFO WILL NOT CLEAR. 


3° 
s Perfore DMA_START bit testing on each line individually. 
s Teet eech DMA_START bit before TX’ ing dete pettern, report error if set. 
+ Set OMA_START bit on LUT, verify it ie eet. report error if cleer. 

s Weit for DMA te coaplete. 

s Verify OMA_START bit ie cleer, report error if set. 

s Verify correct number of chere 


were received, report errer if <« expected. 
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SEQ 0273 
HARDWARE TEST - DMASTA - 

10661 3° 
10662 053172 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 4003. 
10663 053176 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
10664 053202 012703 000144 MOV #100. ,R3 sPASS THE LENGTH OF THE DATA PATTERN. 
10665 053206 004737 030624 JSR PC ,DODMA sTRANSMIT THE DATA PATTERN. 
cease? 053212 103067 Bcc 12$ 3GO REPORT ERROR IF DMA_START BIT SET. 

3° 
10668 ; Test the state of the DMA_START bit on the line under test. 
rete ; Report error if DMA_START bit is clear. 

5< 
10671 053214 005237 005466 INC ERRNBR sINCREMENT ERROR NUMBER TO 4004. 
10672 053220 010177 127054 MOV R1,@8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
10673 053224 105777 127064 TSTB @TXAD2A sTEST THE STATE OF THE DMA_START BIT. 
root 053230 100060 BPL 12$ 3GO REPORT ERROR IF BIT IS CLEAR. 

3° 
rete ; Wait for DMA transmission to complete. 

aad 
10678 053232 005237 005466 4$: INC ERRNBR sINCREMENT ERROR NUMBER TO 4005. 
10679 053236 010103 MOV R1,R3 sSAVE THE LINE NUMBER. 
10680 053240 012701 170226 MOV #170226,R1 sTEST BIT 15, TIMEOUT OF 150 MILLI SECS. 
10681 053244 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
10682 053250 004737 037740 JSR PC ,WAIBIS ;WAIT FOR DMA TO COMPLETE. 
10683 053254 103045 BCC 10$ ;GO REPORT ERROR IF TIMEOUT OCCURRED. 
10684 053256 012704 000005 MOV @5,R4 sPASS DELAY OF 5 MILLI SECS. 
10685 053262 004737 030370 JSR PC ,DELAY sWAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 
ieee 053266 010301 MOV R3,R1 sRESTORE THE CURRENT LINE NUMBER. 
1 3¢ 
10688 ; Test the state of the DMA_START bit on the line under test. 
eee ; Report error if DMA_START bit is set. 
106 - 
10691 053270 005237 005466 INC ERRNBR s INCREMENT ERROR NUMBER TO 4006. 
10692 053274 010177 127000 MOV R1,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
10693 053300 105777 127010 TSTB @&TXAD2A sTEST THE STATE OF THE DMA_START BIT. 
eee 053304 100432 BMI 12$ 3GO REPORT ERROR IF BIT IS STILL SET. 
1 3¢ 
10696 ; Verify the number of chars received = number of chars expected. 
10697 ; Report error if count is incorrect. 
os ; If more than 128 BMP codes are found then report error and exit test. 
1 g= 
10700 053306 005003 CLR R3 ;CLEAR THE READ COUNTER. 
10701 053310 012704 000200 MOV #128. ,R4 ;SET UP MAX BMP CODE READ COUNT. 
10702 053314 012737 007647 005466 63: MOV #4007. ,ERRNBR ;SET ERROR NUMBER TO 4007. 
10703 053322 017702 126754 MOV ORBUFA ,R2 ;READ THE CHARACTER FROM THE FIFO. 
10704 053326 100021 BPL 12$ :GO REPORT ERROR IF FIFO EMPTY TOO SOON. 
10705 053330 012700 170301 MOV #170301,R0 ;SET-UP BIT MASK OF A BMP CODE. 
10706 053334 040200 BIC R2,R0 sTRY TO CLEAR THE BMP CODE MASK. 
10707 053336 001007 BNE 8$ sBRANCH IF NOT A BMP CODE. 
10708 053340 005237 005466 INC ERRNBR sINCREMENT ERROR NUMBER TO 4008. 
10709 053344 004737 035624 JSR PC ,.SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
10710 053350 005304 DEC R4 sDECREMENT MAX BMP CODE READ COUNT. 
10711 053352 001416 BEQ 50$ 3GO REPORT ERROR IF TOO MANY BMP CODES FOUND. 
10712 053354 000757 BR 6$ 300 NOT COUNT THE BMP CODE AS A VALID CHAR. 
10713 053356 005203 83: INC R3 ;COUNT THIS CHARACTER. 
10714 053360 020327 000144 CMP R3,4100. sHAVE WE RECIEVED 100 CHARACTERS?. 
10715 053364 002753 BLT 6$ ;LOOP UNTIL 100 (NON-BMP) CHARS ARE READ. 
bhg 053366 000404 BR 14$ ;SKIP AROUND THE ERROR REPORT. 
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HARDWARE TEST - DMASTA - 






SEQ 0274 












10718 :¢ 
10719 ; Report error, skip further testing on this line. 
10720 e 
eae 053370 010301 108: MOV R3,R1 sRESTORE THE CURRENT LINE NUMBER. 
1 
10723 053372 012702 020134 12$: MOV €M4002,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
10724 ; “DMA_START BIT BAD ON LINE nn”. 
10725 053376 ERROR : >>>>> ERROR <<ccc, 
sts 053376 104460 TRAP CSERROR 
10727 053400 005201 148: INC Ri s INCREMENT THE LINE NUMBER COUNTER. 
10728 053402 005705 TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
10729 053404 001261 BNE 2s sYES; BRANCH TO TEST {HE NEXT LINE. 
aovee 053406 000402 BR 60$ 3NO; EXIT THIS TEST. 
i 

10732 053410 004737 036106 50$: JSR PC. TSABRT sREPORT TEST ABORTED. NON-TEST RELATED ERROR. 
hho 053414 005037 002362 608: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
1 
10735 053420 ENDTST 

053420 L10065: 

053420 104401 TRAP CSETST 
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SEQ 0275 
HARDWARE TEST - DMABRT - 
10737 .SBTTL HARDWARE TEST - DMABRT - 
10738 Pe tbat iii titi Titi tii ttt TTT Tite TT TTT TTT TTT TT eee Tee es 
10739 34 - DMA Abort/Restart Test - 
10740 34 This test verifies that each DMA_ABORT bit will correctly halt 
10741 3¢ e DMA transmission, and return a TX_ACTION. 
10742 3# It will also verify that the aborted DMA transmission can be resummed, 
10743 34 anc that ea TX_ACTION is returned upon completion. 
odes 34 This test is performed in internal loopback, on all active lines. 
3* 

10746 i-- SRESICERESEEEEESERAAAEREEEEEEEEAAAEDEEEAEEASEAEEERAEAR EEE EREEEEEEEEREEEERS 
10747 053422 6GNTST 

053422 T27?:: 
10748 000033 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
10749 053422 012737 000033 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (41) 
10750 053430 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
10751 053436 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
10752 053444 012737 010005 005466 MOV #4101. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
10753 053452 012737 020170 005470 MOV @EM4101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
db ad 053460 012737 026440 005472 MOV ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
10756 ; Reset the DUT to a known state, remove the status codes from the fifo. 
10757 ; Clear TX and RX interrupt enable bits in the CSR. 
10758 ; This subroutine reports error >>>>> 4101 <<<<<, 
10759 3- 
10760 053466 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
10761 053472 103160 BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 
10762 
dans 053474 004737 031342 JSR PC, INDATP sINITIALISE 256 BYTE DATA PATTERN. 
10764 3¢ 
10765 ; Set internal loopback,enable receiver functions on all active lines. 
10766 ; Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 
10767 ; 2 stop bits. 
tee ; Enable transmitters on all active lines. 
1076 :- 
10770 053500 013705 002272 MOV ACTLNS RS sPASS THE ACTIVE LINE BIT MAP. 
10771 053504 012700 000204 MOV #204 ,RO sPASS THE LNCTRL CONTENTS. 
10772 053510 004737 040250 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
10773 053514 012700 177670 MOV #177670,RO ;PASS THE LPR CONTENTS. 
10774 053520 004737 040324 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
10775 053524 004737 036446 JSR PC, TXENBL sENABLE TRANSMITTERS ON ALL LINES. 
10776 3¢ 
eee ; Perform DMA_ABORT bit testing on each individual (active) line. 
10778 3° 
10779 053530 013705 002272 MOV ACTLNS ,RS ;GET THE ACTIVE LINE BIT MAP. 
10780 053534 005001 CLR R1 s;CLEAR THE LINE NUMBER COUNTER. 
10781 053536 012737 010006 005466 23%: MOV #4102. ,ERRNBR ;SET THE ERROR NUMBER TO 4102. 
10782 053544 000241 CLC sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
10783 053546 006005 ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
10784 053550 103123 BCC 10$ 300 NOT TEST THE LINE IF IT IS INACTIVE. 
10785 053552 004737 032722 JSR PC ,PUFIFO s;PURGE THE FIFO. 
ieee 053556 103124 BCC 50$ 3GO REPORT ERROR IF FIFO WILL NOT CLEAR. 
1078 i+ 
a s Check the DMA_ABORT bit before enabling DMA, report error if set. 

g- 

10790 053560 005237 005466 INC ERRNBR sINCREMENT ERROR NUMBER TO 4103. 
10791 053564 610177 126510 MOV R1,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
10792 053570 032777 000001 126512 BIT @BITO,@LNCTRA sTEST THE STATE OF THE DMA_ABORT BIT. 
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HAROWARE TEST 


10793 
10794 
10795 
10796 
10797 
10798 


053576 


053702 
053706 
053712 


053714 
053722 


053730 
053734 
053736 
053742 
053746 
053752 
053754 
053760 
053764 





001105 


103103 


010177 
012704 
004737 
052777 


005237 
010103 
012701 
013702 
004737 
103050 
010301 


005237 
012702 


010177 
105777 
100441 


042777 
052777 


005237 
010103 
012701 
013702 
004737 
103016 
012704 
004737 
010301 


- DMABRT - 


005466 


170012 
002300 
037740 


005466 
020247 


126372 
126402 


000001 
000200 


005466 


170536 
002300 
037740 


000002 
030370 





126444 


126366 
126364 
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BNE 6$ sGO REPORT ERROR IF BIT IS SET. 


s Enable DMA TX on selected line, wait for DMA to TX approx 1/4 of date. 
3 Abort the DMA transmission. Wait for TX_ACTION to be returned. 


INC ERRNBR sSET ERROR NUMBER TO 4104. 

MOV @BUFBAS ,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
MOV #256. ,R3 sPASS THE LENGTH OF THE DATA PATTERN. 

JSR PC ,DODMA s TRANSMIT THE DATA PATTERN. 

BCC 50$ sGO REPORT ERROR IF THERE ARE TX PROBLEMS. 


3° 
; Wait for DMA to transmit 1/4 of the data before aborting. 
3- 


MOV R1,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
MOV #50. ,R4 sPASS THE DELAY TIME OF 40 MILLI SECONDS. 
JSR PC ,DELAY sWAIT FOR APPROX 1/4 OF DATA TO BE TXx'D. 


BIS #BITO,@LNCTRA sABORT THE DMA TRANSMISSION. 
7¢ 
; Wait for TX_ACTION to be returned, report error if time-out occurs. 
3° 


INC ERRNBR s INCREMENT ERROR NUMBER TO 4105. 
MOV R1,R3 sSAVE THE LINE NUMBER. 
MOV #170012,R1 sTEST BIT 15, TIMEOUT OF 10 MILLI SECS. 
MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE. 
BCC 4$ :GO REPORT ERROR IF TIMEOUT OCCURRED. 
MOV R3,R1 sRESTORE THE CURRENT LINE NUMBER. 
;* 
; Verify DMA_START bit clear, report error if set. 
ge 
INC ERRNBR s INCREMENT ERROR NUMBER TO 4106. 
MOV 9€M4103,R2 sSELECT MESSAGE TO BE REPORTED. 
; “DMA_START BIT FOUND SET AFTER DMA ABORTED”. 
MOV R1,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
TSTB @&TXAD2A sTEST THE STATE OF THE DMA_START BIT. 
BMI 8$ 3GO REPORT ERROR IF IT IS SET. 


3¢ 
; Resume DMA transmission by clearing DMA_ABORT and setting DMA_START. 


; BIC @BITO,@LNCTRA ;CLEAR THE DMA_ABORT BIT. 
BIS @BIT7,8TXAD2A ;SET THE DMA_START BIT. 


3° 
; Wait for DMA transmission to complete. 


INC ERRNBR sINCREMENT ERROR NUMBER TO 4107. 

MOV R1,R3 sSAVE THE LINE NUMBER. 

MOV #170536,R1 sTEST BIT 15, TIMEOUT OF 350 MILLI SECS. 

MOV CSRA ,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE. 

BCC as sGO REPORT ERROR IF TIMEOUT OCCURRED. 

MOV #2,R4 sPASS TIME-OUT OF 2 MILLI SECS. 

JSR PC ,DELAY sWAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 
MOV R3,R1 sRESTORE THE CURRENT LINE NUMBER. 


i¢ 

; Test the state of the DMA_ABORT bit on the line under test. 
; Report error if ODMA_ABORT bit is set. 
ge 





SEQ 0276 








= 
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HARDWARE TEST 


10850 
10851 
108S2 
10853 
10854 
10855 
10856 
10857 
10858 
10859 
10860 
10861 
10862 


10863 
10864 
10865 
10866 
10867 
10868 
10869 
10870 
10871 
10872 
10873 
10874 


—— 


053766 
053772 
053776 
054004 
054006 


054010 
054012 


054016 
054016 


054030 
054034 


054040 
054040 
054040 





005237 
010177 
032777 
001002 
000404 


010301 
012702 


104460 


005201 
005705 
001244 
000402 


004737 
005037 


104401 





- DMABRT - 


005466 
126302 
000001 


020213 


036106 
002362 


126304 


INC ERRNBR 

MOV R1,@CSRA 

BIT enn 
$ 


BR 10$ 


3° 





sINCREMENT ERROR NUMBER TO 4108. 

sSELECT THE LINE CURRENTLY UNDER TEST. 

sTEST THE STATE OF THE DMA_ABORT BIT. 

sGO REPORT ERROR IF BIT IS SET. 

sBRANCH TO CHECK FOR ANY MORE LINES TO TEST. 


; Report error, skip further testing on this line. 


4$: MOV R3,R1 
6$: MOV €M4102,R2 
8$: ERROR 


sRESTORE THE CURRENT LINE NUMBER. 


sPASS THE ERROR MESSAGE TO BE REPORTED. 
; “DMA_ABORT BIT BAD ON LINE nn”. 
; >>>>> ERROR <<<<<, 
TRAP CSERROR 


3¢ 
; Verify all active lines have been tested. 


40 
10$: INC R1 
TST RS 

BNE 2$ 

BR 60$ 
50$: JSR PC, TSABRT 
60$: CLR CTRLCF 

ENDTST 





sINCREMENT THE LINE NUMBER COUNTER. 

sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
sYES; BRANCH TO TEST THE NEXT LINE. 

sNO; EXIT THIS TEST. 


sREPORT TEST ABORTED. NON-TEST RELATED ERROR. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10066: 
TRAP CSETST 
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10876 
10877 
10878 
10879 
10880 
10881 
10882 
10883 
10884 
10885 
10886 
10887 
10888 
10889 
10890 
10891 
10892 
10893 


10894 
10895 
10896 
10897 
10898 
10899 
10900 
10901 
10902 
10903 
10904 
10905 
10906 
10907 
10908 
10909 
10910 
10911 
10912 
10913 
10914 
10915 
10916 
10917 
10918 
10919 
10920 
10921 
10922 
10923 


10929 
10930 
10931 


054106 
054112 


054114 


054120 
054124 
054130 
054134 
054140 
054144 
054150 


000034 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103146 


004737 


013705 
012700 
004737 
012700 
004737 
012704 
004737 


- IAUTOI - 


000034 
177777 
000001 
011755 
021205 
026440 


030172 


031372 


000012 
030370 


002364 
002362 
005464 
005466 
005470 
005472 





-SBTTL HARDWARE TEST - IAUTOI - 
Ft ORARAREREREEARASEAEAEASEEEAREKASEAREEAKESEASESARAAEAEEAEEREREREREEEEAREEALEDSE 
34 - IAUTO BIT INACTIVE TEST - 
3;* 
3% This test verifies that the DUT’s IAUTO function behaves correctly 
34 when inactive, ie. IAUTO bit clear. 
3% All active lines are tested individually by filling the FIFO 
3% then readi the received data checking for the presence of 
3* XOFFCASCII 0C3) or XON CASCII DC1) characters. 
3% If any are found then appropriate errors are reported. 
;* Any BMP codes that are found will be placed on the BMP code queue, 
3% to be reported later. 
:e The characters are transmitted on all active lines, in internal 
3* loopback mode. 
7* 
§ - ~SRSARASERERSEASESASASESEERAKARAARESAREREAASEAAAAAREREAAAEAAASALELRERRERALEREE 

BGNTST 120 

TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (51) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #5101. ,ERRNBR sSET ERROR NUMBER TO 5101. 
MOV #EMS101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
3¢ 
; Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 
; This subroutine reports error >>>>> 5101 <<<<<, 


"je 
JSR PC,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCC 60$ sEXIT TEST IF FATAL ERROR FOUND. 


3? 

; Initialize the 256 byte data pattern. 

; Ensure the date pattern is free from XON’s or XOFF’s to prevent errors. 

; Note: the first two characters and the last two characters will be the same. 


7 
JSR PC, INDTPX sINITIALISE DATA PATTERN. 
; Set internal loopback, disable IAUTO, enable receiver on the selected line. 


; Set LPR to 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 
dad 


MOV ACTLNS ,RS sPASS THE ACTIVE LINE BIT MAP. 

MOV #204 ,RO sPASS INT'L LOPBCK, ENABLE RX, DISABLE IAUTO. 
JSR PC ,WTWLNC sINITIALISE THE LINE CONTROL REGISTER. 

MOV #177670,RO sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sSET THE LPR CONTENTS TO 38.4K BAUD. 

MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 

JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 


3¢ 

; Set up loop for all active lines. 

; Test the state of the IAUTO bit prior to transmitting the data pattern. 
; If the bit is set, then report the error and skip transmitting 

3; the date pattern on the selected line. 


SEQ 0278 
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SEQ 0279 
HARDWARE TEST - IAUTOI - 
10932 ; Transmit a 256 character date pattern using DMA, on a single channel 
abe oy ; Empty the fifo, and verify no XOFF or XON chars were found. 
ad 

10935 054154 005001 CLR Ri sCLEAR THE LINE NUMBER COUNTER. 
10936 054156 005037 054426 CLR 55% sCLEAR STORAGE FOR LINE NUMBER. 
10937 054162 012737 011756 005466 23: MOV #5102.,ERRNBR ;SET THE ERROR NUMBER TO 5102. 
10938 054170 004737 032722 JSR PC ,PUFIFO sPURGE THE FIFO. 
10939 054174 103111 BCC 50$ 3GO REPORT ERROR IF FIFO DID NOT PURGE. 
10940 054176 000241 CLC sCLEAR CARRY PRIOR TO ROTATING BIT MAP. 
10941 054200 006005 ROR RS sROTATE THE BIT MAP INTO THE CARRY BIT. 
roe | 054202 103077 BCC 12$ sBRANCH IF LINE IS INACTIVE. 

3¢ 
10944 ; Test the IAUTO bit on the selected active line. 
10945 ; Report error if it is set. 
cone ; Do not transmit the data pattern on the selected line. 
1 a 
10948 054204 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 5103. 
10949 054210 010177 126064 MOV R1,@CSRA sSELECT LINE TO TEST. 
10950 054214 032777 000002 126066 BIT @BIT1,Q@L.NCTRA ;TEST THE STATE OF THE IAUTO - ON THIS LINE. 
10951 054222 001404 BEQ as sSKIP ERROR IF IAUTO BIT CLEAR 
10952 054224 012702 021233 MOV #€M5102,R2 “— THE CORRECT ERROR MESSAGE. 
10953 054230 ERROR >>>>> ERROR <<<cc, 

054230 104460 TRAP CSERROR 
ted 054232 000463 BR 12$ ;SKIP TRANSMITTING DATA PATTERN. 
10956 3° 
ted ; Transmit date pattern of 256 chars. 
1 i= 
10959 054234 005237 005466 4$: INC ERRNBR sSET ERROR NUMBER TO 5104. 
10960 054240 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
10961 054244 012703 000400 MOV $256. ,R3 sPASS THE LENGTH OF THE DATA PATTERN. 
10962 054250 004737 030624 JSR PC ,.DODMA ;TRANSMIT THE DATA PATTERN. 
tery 054254 103061 BCC 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 
10965 i+ 
10966 ; Wait for DMA to complete, then wait for the last character plus XOFF 
ted ; to arrive in the fifo. 
10 _ 
10969 054256 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5105. 
10970 054262 012701 170536 MOV #170536,R1 sPASS TIME-OUT VALUE OF 350 MILLI SECS. 
10971 054266 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
10972 054272 004737 037740 JSR PC ,WAIBIS s;WAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
10973 054276 103050 BCC 50$ ;IF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 
10974 054300 012704 000012 MOV #10. ,R4 ;PASS DELAY OF 10 MILLI SECS. 
ooce 054304 004737 030370 JSR PC ,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
10976 
10977 3¢ 
10978 ; Read 256 chars from the fifo. Report error if any XOFF's or XON’s 
10979 ; are found. 
10980 $- 
10981 054310 005237 005466 INC ERRNBR sINCREMENT ERROR NUMBER TO 5106. 
10982 054314 012701 000400 MOV #256. ,R1 sINITIALISE THE READ COUNTER. 
10983 054320 017702 125756 6$: MOV ORBUFA ,R2 s;READ CHAR FROM THE FIFO. 
meee 054324 100035 BPL 50$ +GO REPORT ERROR IF FIFO EMPTY. 
3? 

eee ; Check for BMP code in the fifo. Save any found on the queue. 
i g° 
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10988 
10989 
10990 
10991 
10992 
10993 
10994 
10995 


—— 


054326 
054332 
054334 
054336 


012700 
040200 
001002 
004737 


120227 
001406 
120227 
001403 
005301 
001357 
000407 


005237 
013701 
012702 


104460 


005237 
013701 
005705 
001262 
000404 


004737 
000401 
000000 
005037 


104401 


- IAUTOI - 
170301 


035624 


000023 
000021 


005466 
054426 
021271 


054426 
054426 


036106 


002362 


10$: 


555: 


BIC 
BNE 8$ 
JSR PC ,SAVBMP 


MOV #170301,R0 
2,RO 





sSET UP BMP BIT MASK. 

sTRY TO CLEAR ALL THE BMP BITS. 
sSKIP BMPSAV IF NOT A BMP CODE. 
sSAVE THE BMP CODE ON THE QUEUE. 


3¢ 
; Check for XOFF and XON characters. 


og 
CMPB aaa 


DEC R1 

BNE 6$ 

BR 12$ 
INC ERRNBR 
MOV 55$,R1 


MOV €M5103,R2 


INC 55$ 
MOV 55$,R1 
TST RS 
BNE es 
BR 60$ 


JSR PC, TSABRT 
60$ 


-WORD 0 
CLR CTRLCF 
ENOTST 





sIS IT AN XOFF CHARACTER?. 

sYES; GO REPORT ERROR. 

sNO; IS IT AN XON CHARACTER?. 

sYES; GO REPORT ERROR. 

sDECREMENT THE READ COUNT. 

sLOOP TO READ THE NEXT CHAR. 

sGO CHECK FOR ANY UNTESTED ACTIVE LINES. 


;SET ERROR NUMBER TO 5107. 
sPASS THE LINE NUMBER TO BE REPORTED. 
;PASS THE ERROR MESSAGE TO BE REPORTED. 
; >>>>> ERROR <<<<<, 
TRAP CSERROR 


3 

; Check if all active lines have been tested. 

3 
12$: 


sINCREMENT LINE NUMBER. 

sGET NUMBER OF THE NEXT LINE TO TEST. 

sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
sLOOP TO CHECK NEXT LINE. 

sEXIT TEST. 


sREPORT TEST ABORTED. NON-TEST RELATED ERROR. 
sEXIT THIS TEST. 

sSTORAGE FOR LINE NUMBER. 

sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10067: 
TRAP CSETST 
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HARDWARE TEST 





054436 
054436 


054436 
054444 
054452 
054460 
054466 
054474 


054502 
054506 


054510 


054514 
054520 
054524 
054530 
054534 
054540 
054544 


000035 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103161 


004737 


013705 
012700 
004737 
012700 
004737 
012704 
004737 


- IAUTOA - 


000035 
177777 
000001 
012121 
021321 
026440 


030172 


031372 


002272 
000206 
040250 
177670 
040324 
000012 
030370 


002364 
002362 
005464 
005466 
005470 
005472 


-SBTTL HARDWARE TEST - IAUTOA - 
E+ ERPEREREREREEEEEREREE EEE EEEEEEOD EE EEEEOEES ED OEOEEE EOE OE 0848404008404 0R084 
3% - IAUTO BIT ACTIVE TEST - 
;* 
3% This test verifies that the DUT's IAUTO function behaves correctly 
3% when active, ie IAUTO asserted high. 
3% All active lines are tested individually by filling the FIFO, and 
3% checking for the presence of at least one XOFF(ASCII 0C3) character 
3* and one XON CASCII 0C1) character. 
3% Any BMP codes that are found will be placed on the BMP code queue, 
34 to be reported later. 
3% The characters are transmitted on all active lines, in internal 
;* loopback mode. 
3* 
t- ~REREEREEEEAERAAEAEREREE EERE EREAEEAAREEEEAEEAEAAEREAEAEREREEEEEDEREREEREREEEES 
BGNTST vee 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (52) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #5201.,ERRNBR ;SET ERROR NUMBER TO 5201. 
MOV @EMS201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3;¢ 

+ Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CS 

; This subroutine reports error >>>>> 5201 <<<<<, 


2 
JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCC 60$ sEXIT TEST IF FATAL ERROR FOUND. 


3¢ 

; Initialize the 256 byte date pattern. 

+ Ensure the data pattern is free from XON'’s or XOFF’s to prevent errors. 

s Note: the first two characters and the lest two characters will be the same. 


g@ 

JSR PC ,INDTPX sINITIALISE DATA PATTERN. 
7¢ 
+ Set internal loopback, enable IAUTO and receiver on the selected line. 
; Set LPR to 38.4k baud, 8 bits per character, odd perity, 2 stop bits. 
3° 


MOV ACTLNS ,RS sPASS THE ACTIVE LINE BIT MAP. 

MOV #206 ,RO sPASS INTERNAL LOPBCK, ENABLE RX AND IAUTO. 
JSR PC ,WTWLNC sINITIALISE THE LINE CONTROL REGISTER. 

MOV #177670,R0 sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sSET THE LPR CONTENTS TO 38.4K BAUD. 

MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 


JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
3? 

; Set up loop for all active lines. 

; Test the state of the OAUTO bit prior to transmitting the date pattern. 

i If the bit is clear, then report the error and skip transmitting 

; the date pattern on the selected line. 

; Transmit ea 224 character date pattern using DMA, on a single channel 





SEQ 0281 








(SR A en en ee ee 
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SEQ 0282 
HARDWARE TEST - IAUTOA - 
eas ; Empty the fifo, and count the XOFF and an XON chars found. 
ad 

11081 054550 005001 CLR R1 ;CLEAR THE LINE NUMBER COUNTER. 
11082 054552 005037 055050 CLR 55$ sCLEAR STORAGE FOR LINE NUMBER. 
11083 054556 012737 012122 005466 23: MOV #5202. ,ERRNBR sSET THE ERROR NUMBER TO 5202. 
11084 054564 004737 032722 JSR PC ,PUFIFO sPURGE THE FIFO. 
11085 054570 103124 BCC 50$ ;GO REPORT ERROR IF FIFO DID NOT PURGE. 
11086 054572 000241 cLC sCLEAR CARRY PRIOR TO ROTATING BIT MAP. 
11087 054574 006005 ROR RS sROTATE THE BIT MAP INTO THE CARRY BIT. 
oss 054576 103112 BCC 16% ;BRANCH IF LINE IS INACTIVE. 

3¢ 
11090 ; Test the IAUTO bit on the selected active line. 
11091 ; Report error if it is clear. 
ssaee ; Do not transmit the data pattern on the selected line. 

3° 
11094 054600 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5203. 
11095 054604 010177 125470 MOV R1,8CSRA ;SELECT LINE TO TEST. 
11096 054610 032777 000002 125472 BIT #B1IT1,98LNCTRA sTEST THE STATE OF THE IAUTO BIT ON THIS LINE. 
11097 054616 001004 BNE 4$ ;SKIP ERROR IF IAUTO BIT SET. 
11098 054620 012702 021345 MOV $EM5202,R2 ;PASS THE CORRECT ERROR MESSAGE. 
11099 ; “IAUTO BIT FOUND CLEAR ON LINE nn" 
11100 054624 ERROR : >>>>> ERROR <<ccc, 

054624 104460 TRAP CSERROR 

ri 054626 000476 BR 16$ sSKIP TRANSMITTING DATA PATTERN. 
11102 
11103 i+ 
ree ; Transmit date pattern to fill the fifo, 223 chars + 32 xoff's + xon. 
11106 054630 005237 005466 4$: ; INC ERRNBR ;SET ERROR NUMBER TO 5204. 
11107 054634 012702 004012 MOV @BUF BAS ,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
11108 054640 012703 000337 MOV $223. ,R3 sPASS THE LENGTH OF THE DATA PATTERN. 
11109 054644 004737 030624 JSR PC ,DODMA sTRANSMIT THE DATA PATTERN. 
ite 054650 103074 BCC 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 
11112 :¢ 
11113 ; Wait for DMA to complete, then wait for the last cheracter plus XOFF 
THT! ; to errive in the fifo. 
1 t= 
11116 054652 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5205. 
11117 054656 012701 170536 MOV #170536,R1 sPASS TIME-OUT VALUE OF 350 MILLI SECS. 
11118 054662 013702 002300 MOV CSRA,R2 ;PASS THE ADDRESS OF THE CSR. 
11119 054666 004737 037740 JSR PC ,WAIBIS ;WAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
tort 054672 103063 BCC 50$ sIF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 
11122 3¢ 
ire ; Read 256 chars from the fifo, count any XOFF or XON chers found. 

+ id 
11125 054674 005003 CLR R3 ;CLEAR XOFF AND XON INDICATOR. 
11126 054676 005237 005466 INC ERRNBR sINCREMENT ERROR NUMBER TO 5206. 
11127 054702 012701 000400 MOV $256.,R1 sINITIALISE THE READ COUNTER. 
11128 054706 017702 125370 6$: MOV ORBUFA ,R2 ;READ CHAR FROM THE FIFO. 
th 054712 100053 BPL 50$ 3GO REPORT ERROR IF FIFO EMPTY. 

3* 
thy ; Check for BMP code in the fifo. Save any found on the queue. 
< i- 

11133 054714 012700 170301 MOV #170301,R0 ;SET UP BMP BIT MASK. 
11134 054720 040200 BIC R2,RO ;TRY TO CLEAR ALL THE BMP BITS. 


| 
a 
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SEQ 0283 





































































11135 054722 001002 BNE 8$ sSKIP BMPSAV IF NOT A BMP CODE. 
ist 054724 004737 035624 JSR PC , SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 

11 3+ 
ibe 3; Check for XOFF and XON characters. 

1 s- 
11140 054730 120227 000023 8$: CMPB «= R2, 023 :IS IT AN XOFF CHARACTER?. 
11141 054734 001002 BNE 10$ sNO, BRANCH TO SEE IF IT IS AN XON. 
11142 054736 052703 000001 BIS #BITO,R3 sINDICATE THE XOFF CHAR. 
11143 054742 120227 000021 10$: CMPB §=R2, 21 sIS IT AN XON CHARACTER?. 
11144 054746 001002 BNE 12$ sNO, SKIP THE NEXT INSTRUCTION. 
11145 054750 052703 000002 BIS #BIT1,R3 sINDICATE THE XON CHAR. 
11146 054754 005301 12$: DEC Ri sDECREMENT THE READ COUNT. 256 READ? 
11147 054756 001410 BEQ 14$ sYES, EXIT THE LOOP. 
11148 054760 020127 000200 CMP R1,0128. sNO. HAVE WE READ EXACTLY 128 CHARS? $33 
11149 054764 001350 BNE 6$ 3NO, LOOP TO READ MORE. 
11150 054766 012704 000012 MOV #10. ,.R4 sYES. DELAY 10MS TO WAIT FOR THE XON CHAR 
11151 054772 004737 030370 JSR PC, DELAY ; (WHICH IS LAST CHAR) TO GET INTO FIFO. 
ai 054776 000743 BR 6$ sLOOP TO READ MORE CHARS. 

3¢ 
11154 ; Verify than at least 1 XOFF and 1 XON was found in the fifo. 
fide ; Report error if none were found. 
ge 
11157 055000 020327 000003 14$: CMP R3,03 sDID WE GET AT LEAST 1 XON AND 1 XOFF? 
11158 055004 001407 BEQ 163 sYES, SKIP ERROR REPORT. 
11159 055006 005237 005466 INC ERRNBR sNO, SET ERROR NUMBER TO 5207. 
11160 055012 013701 055050 MOV 55$,R1 sPASS THE LINE NUMBER TO BE REPORTED. 
11161 055016 012702 021271 MOV #€M5103,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
11162 + “IAUTO BIT BAD ON LINE nn“. 
11163 055022 ERROR ; >>>>> ERROR <<ccc, 
055022 104460 TRAP CSERROR 
11164 i¢ 
pen s Check if all active lines have been tested. 
§° 

11167 055024 005237 055050 16$: INC 55% sINCEMENT LINE NUMBER. 
11168 055030 013701 055050 MOV 55$,R1 sGET NUMBER OF THE NEXT LINE TO TEST. 
11169 055034 095705 TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
11170 055036 001247 BNE 2s ;LOOP TO CHECK NEXT LINE. 
rte 055040 000404 BR 60$ sEXIT TEST. 
11173 055042 004737 036106 50$: JSR PC, TSABRT sREPORT TEST ABORTED. NON-TEST RELATED ERROR. 
11174 055046 000401 BR 60$ sEXIT THIS TEST. 
11175 055050 000000 55$: -WORD 0 ;STORAGE FOR LINE NUMBER . 
res 055052 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

1 






055056 L10070: 
055056 104401 TRAP CsETST 
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S202 
11235 055206 


000036 
012737 
012737 
012737 
012737 
012737 


004737 
103107 


004737 
103104 
004737 


- FIFDAT - 


000036 
177777 


000001 
012265 
021403 


030172 


030772 
0631342 


-SBTTL HARDWARE TEST - FIFDAT - 
$+ +Ob6O6 06060606 000000000606 0000000006 0600000000006 06000004000000000000000008008 
- FIFO VALIO DATA TEST - 
3¢ This test verifies thet the DUT is capable of holding 256 velid 
3% cheracters in its fifo. 
34 The cherecters ere transmitted on the first eveileble ective line, in 
3% internel loopback mode. 
34 The dete found in the fifo is compered with the expected dete, end any 
;e discrepencies ere reported. 
3@ Any BMP code found will invelidate the test end cause it to be eborted. 
3% However the BMP code will be pleced on the BMP code queue, to be 
3% reported leter. 
3% 
§ - - 060660666 00000600 00006606 08 00006000600000000000000600000000606606000000000000008 
BGNTST a 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (53) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #5301.,ERRNBR ;SET ERROR NUMBER TO 5301. 
MOV @EMS301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 


3¢ 
; Reset the DUT to e known stete, remove the stetus codes from the fifo. 
; Cleer TX and RX interrupt eneble bite in the CSR. 

; This subroutine reports error >>>>> S301 <<<c<, 


g° 
JSR PC,,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
Bcc 60% sEXIT TEST IF FATAL ERROR FOUND. 

3¢ 


3; Find an ective line on which to perform the test. 
; Initielise 256 byte dete pettern. 


JSR At te sFIND AN ACTIVE LINE. 
Bcc sEXIT IF NO ACTIVE LINES FOUND. 
JSR PC, * INOATP sINITIALISE THE DATA PATTERN. 


3° 

; Trenemit e 265 cherecter dete pattern using DMA, on e single channel 
; et 38.4k beud, 8 bits per cherecter, odd perity, 2 stop bites. 

ge 


3¢ 

+ Set internal loopbeck on the selected line. 

+ Trenemit the dete pattern on the first eveileble ective line. 
g° 


MOV #204 ,RO sPASS PARAMETER FOR INTERNAL LOPBCK,ENABLE RX. 

JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 

MOV #177670, RO sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sSET THE LPR CONTENTS TO 38.4K BAUD. 
MOV #10. .R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 

JSR PC DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
MOV @BUF BAS ,R2 sPASS The START OF THE DATA PATTERN TO TX. 
MOV @BUF MID-BUFBAS .R3 sPASS THE LENGTH OF THE DATA PATTERN. 

INC ERRNBR sSET ERROR NUMBER TO 5302. 

JSR PC ,DODMA sTRANSMIT THE DATA PATTERN. 

Bcc 50% sABORT TEST IF ERROR FOUND DURING DMA TX. 


SEQ 0284 
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HAROWARE TEST 





11236 
11237 
11238 
11239 
11240 055210 
11241 055214 
11242 055216 
11243 055222 
11244 055226 
11245 055232 
11246 055234 
11247 055240 
11248 


5300 
11267 055302 
11268 
11269 055304 
11270 055310 
11271 055312 
11272 055314 
11273 055322 
11274 
11275 055326 

055 


326 
11276 055330 
11277 055332 
11278 055334 


012737 


005466 


170536 
002300 
037740 


000005 
030370 


002302 
012270 


005466 
027256 


005466 


025420 
021430 


036106 
002362 


005466 


005472 







3¢ 
+ Weit for DMA to complete, then wait for the lest cherecter to errive in 
3; the fifo. 


ERRNBR 
R1,R3 
#170536,R1 
CSRA ,R2 

PC ,WAIBIS 
50% 


@5,.R4 
PC DELAY 


sSET ERROR NUMBER TO 5303. 

sSAVE THE NUMBER OF THE SELECTED ACTIVE LINE. 
;PASS TIME-OUT VALUE OF 350 MILLI SECS. 

sPASS THE ADORESS OF THE CSR. 

sWAIT FOR OMA TO COMPLETE, TX_ACTION SET. 
sBRANCH IF FIFO EMPTY, ABORT THE TEST. 

sPASS DELAY OF 5 MILLI SECS. 

sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 


3¢ 
: Read the FIFO erary “ps dete corruption, report eny errors found. 


; Abort the test if e 


code wes found in the fifo. 


sMULTIPLY BY 2. 

sINITIALISE THE EXPECTED DATA. 

sGET THE ADDRESS OF THE RECEIVER BUFFER REG. 
iSET UP ERROR NUMBER EACH TIME AROUND LOOP. 
sGET THE ACTUAL DATA FROM THE FIFO. 

sABORT THE TEST IF THE FIFO IS EMPTY. 


: * check if the reed cherecter is e BMP code. 
If it ie e@ BMP code seve it on the queue to be reported leter, end 
ebort the test. 


4: 


ERRNBR 
3 . CHKBMP 


ERRNBR 
R4,R2 
8s 


@€R9002, 
@€MS302,R1 


sSET ERROR NUMBER TO 5305. 
sCHECK IF CHARACTER IS A BMP CODE. 
‘wrpteg:* IF NOT A BMP CODE. 

>>>>> ERROR S305 <<ccc, 


TRAP 
sABORT THIS TEST. 


sSET ERROR NUMBER TO 5306. 

sCOMPARE THE EXPECTED WITH THE ACTUAL DATA. 
sSKIP ERROR REPORT IF DATA IS OK 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 


THE ERROR “FIFO ee DATA FIELD CORRUPTED’ 


>>>>> ERROR S306 <<ccc, 
TRAP 


sINCREMENT THE EXPECTED DATA. 
34 IF NOT DONE. 





sABORT THE TEST, REASON SHOWN BY ERROR NUMBER 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10071: 





C#ERROR 


CeERROR 


CeeTsT 
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SEQ 0286 
HARDWARE TEST - FI3QLI - 
11285 .SBTTL HARDWARE TEST - FI3QLI - 
11286 PARP PCE TITEL eri iriririiitiiti titi Titi TTT TiTITiTiTiTiTirirviritiiTTT TTT TT TTTT 
11287 34 - FIFO 3/4 LEVEL INACTIVE TEST - 
11288 34 
11289 34 This test verifies that the DUT's fifo 3/4 level alerm system 
11290 34 remains inactive while it contains 191 characters or less. 
11291 34 The test looks for an XOFF (ASCII 0C3) cheracter in the fifo. 
11292 3@ If any XOFF’s are found an error will be reported and the test aborted. 
11293 34 Any BMP code found will invalidate the test and cause it to be aborted. 
11294 3¢ However the BMP code will be placed on the BMP code queue, to be 
11295 34 reported leter. 
11296 34 The characters are transmitted on the first available active line, in 
11297 34 internal loopback mode. 
11298 34 
11299 3- ~SRSEESEEEEAESERESESEAAEAHSEAASEHESEEKAAAREREAEAEKARESAKREEEKEEEEEEEREREDEAEAL 
11300 
11301 055350 BGNTST 
055350 T31:: 
11302 000037 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
11303 055350 012737 000037 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (54) 
11304 055356 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
11305 055364 012737 000001 005464 MOV #1,ERRTYP ;SET FATAL ERROR TYPE IN ERROR TABLE. 
11306 055372 012737 012431 005466 MOV #5401. ,ERRNBR ;SET ERROR NUMBER TO 5401. 
11307 055400 012737 021560 005470 MOV ®€MS401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
Tht 055406 012737 024644 005472 MOV ®EROSO3,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
1 3° 
11310 ; Reset the DUT to a known state, remove the status codes from the fifo. 
11311 ; Clear TX and RX interrupt enable bits in the CSR. 
eae ; This subroutine reports error >>>>> 5401 <«<<<<, 
1131 3- 
11314 055414 004737 030172 JSR PC .CLNRST s;RESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
Thr 055420 103111 Bcc 60% sEXIT TEST IF FATAL ERROR FOUND. 
11316 3° 
tH ; Find an active line on which to perform the test. 
11318 s- 
11319 055422 004737 030772 JSR PC .FINACT ;FIND THE NUMBER OF THE FIRST ACTIVE LINE. 
coe 055426 103106 Bcc 60$ sEXIT IF NO LINES ARE AVAILABLE. 
11321 
11322 i* 
11323 : Initialize the 256 byte date pattern. 
11324 ; Ensure the date pattern is free from XON's or XOFF’s to prevent errors. 
cet ; Note: the first two characters and the last two characters will be the same. 
1326 s- 
nt 055430 004737 031372 JSR PC, INDTPX sINITIALISE THE DATA PATTERN. 
11328 i* 
11329 ; Transmit e 191 character date pattern using DMA, on a single channel 
co ; et 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 
11331 3° 
11332 3¢ 
11333 ; Set internal loopback, enable IAUTO and RX on the selected line. 
oo ; Transmit the date pattern on the first available active line. 
il a° 
11336 055434 012700 000206 MOV $206 ,RO ;PASS INTERNAL LOPBCK, ENABLE RX AND IAUTO. 
11337 055440 004737 040250 JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 
11338 055444 012700 177670 MOV #177670,RO ;PASS THE LPR CONTENTS. 
11339 055450 004737 040324 JSR PC ,WTWLPR ;SET THE LPR CONTENTS TO 38.4K BAUD. 
11240 055454 012704 000012 MOV #10. ,R4 ;PASS DELAY TIME OF 10 MILLI SECONDS. 
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11341 055460 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
11342 055464 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO Tx. 
11343 055470 012703 000277 MOV #191. ,R3 sPASS THE LENGTH OF THE DATA PATTERN. 
11344 055474 004737 030624 JSR PC ,DODMA s TRANSMIT THE DATA PATTERN. 
jibes 055500 103057 BCC 50$ sIF ERROR FOUND DURING DMA THEN ABORT TEST. 
1 
11347 3° 
11348 ; Wait for DMA to complete, then wait for the lest character to arrive in 
11349 3; the fifo. 
11350 3° 
11351 055502 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5402. 
11352 055506 012701 170454 MOV #170454,R1 sPASS TIME-OUT VALUE OF 300 MILLI SECS. 
11353 055512 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
11354 055516 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
11355 055522 103046 BCC 50$ sIF FIFO EMPTY, REPORT ERROR, ABORT THE TEST. 
11356 055524 012704 000005 MOV @5,R4 sPASS DELAY OF 5 MILLI SECS. 
rt 4 055530 004737 030370 JSR PC ,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
11 3° 
11359 ; Read the contents of the fifo. If any of the following conditions occur 
11360 ; report the error and abort the test; ' 
11361 ; Fifo empty too soon. 
11362 ; BMP code found. 
11363 ; Xoff code found. 
opt ; Extre (192) character found in fifo. 
1 3° 
11366 055534 005004 CLR R4 ;CLEAR THE CHARACTER COUNT. 
11367 055536 013705 002302 MOV RBUFA,RS sGET THE ADDRESS OF THE RECEIVER BUFFER REG. 
11368 055542 012737 012267 005466 23: MOV #5303. ,ERRNBR ;SET ERROR NUMBER TO 5403. 
11369 055550 011502 MOV (RS) ,R2 ;GET THE ACTUAL DATA FROM THE FIFO. 
11370 055552 100032 BPL 50$ sFIFO EMPTY, ABORT TEST. 
ieee 055554 005204 INC R4 ;COUNT THE CHARACTER. 
ll 3° 
11373 3; Check if the read character is a BMP code. 
11374 s If it is e@ BMP code save it on the queue to be reported later, and 
aiaae ; abort the test. 
11376 3° 
11377 055556 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5404. 
11378 055562 004737 027256 JSR PC. CHKBMP sCHECK IF CHARACTER IS A BMP CODE. 
11379 055566 103001 BCC 4$ ;BRANCH IF NOT A BMP CODE. 
11380 sREPORT ERROR “BMP CODE FOUND IN FIFO, TEST INVALIDATED”. 
oo 055570 000421 BR 83 sREPORT THE ERROR AND ABORT THE TEST. 
11382 3° 
tos ; Check if the character is an XOFF. Report the error if one is found. 
11384 3- 
11385 
11386 055572 005237 005466 4$: INC ERRNBR sSET ERROR NUMBER TO 5405. 
11387 055576 122702 000023 CMPB = #23,R2 ;CHECK IF THE READ DATA IS AN XOFF. 
11388 055602 001003 BNE 63 ;BRANCH IF NOT AN XOFF. 
£1389 055604 012701 021617 MOV E€M5402,R1 sPASS THE MESSAGE TO BE REPORTED. 
11390 sREPORT THE ERROR “FIFO BAD, ALARM SIGNAL DEFECTIVE’. 
reese 055610 000411 BR 8$ 3GO REPORT THE ERROR AND ABORT THE TEST. 
11392 
11393 055612 005237 005466 63: INC ERRNBR ;SET ERROR NUMBER TO 5406. 
11394 055616 020427 000277 CMP R4,0191. sCHECK IF WE HAVE READ ALL THE CHARACTERS. 
11395 055622 001347 BNE 2s ;LOOP BACK TO GET THE NEXT CHARACTER. 
11396 055624 011502 MOV (R5),R2 sTRY TO READ AN EXTRA CHARACTER FROM THE FIFO. 
11397 055626 100006 BPL 60$ sEXIT IF NON FOUND. 
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11398 055630 012701 021617 MOV EM5402,R1 sPASS THE MESSAGE TO BE REPORTED. 
11399 sREPORT THE ERROR “FIFO BAD, ALARM SIGNAL DEFECTIVc". 
11400 
11401 055634 83: ERROR ; >>>>> ERRORS 5304 THRU 5306 <<<cc<c, 
055634 104460 TRAP CSERROR 
eae 055636 000402 8R 60$ sEXIT THE TEST. 
1140 
11404 >>>>> ERRORS 5402 AND 5403 <<«ccc, 
11405 055640 004737 036106 50$: JSR PC, TSABRT ;REPORT TEST ABORTED. NON-TEST RELATED ERROR. 
fest 055644 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
il 
11408 055650 ENDTST 
055650 L10072: 
055650 104401 TRAP CSETST 
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SEQ 0289 
HARDWARE TEST - FI3QLA - 
1141¢ -SBTTL HARDWARE TEST - FI3QLA - 
11411 ED heeded n htt itt itt LLL TELL titi titi TTT TTT TT TTT TTT TTT TT TTT Tt 
11412 34 - FIFO 3/4 LEVEL ACTIVE TEST - ; 
11413 3* 
11414 3% This test verifies that the DUT’s fifo 3/4 level alarm system 
11415 3* becomes active when the fifo contains > 192 characters. 
11416 34 The test compares the actual number of XOFF (ASCII 0C3) 
11417 34 characters that are found in the fifo with the expected number. 
11418 34 An error will be reported, if the counts are found to differ. 
11419 38 Any BMP code found will invalidate the test and cause it to be aborted. 
11420 34 However the BMP code will be placed on the BMP code queue, to be 
11421 34 reported later. 
11422 3% The characters are transmitted on the first available active line, in 
11423 3% internal loopback mode. 
11424 ie 
11425 §- -SRRRSARRAEREREREAASEAEREEEAEEEAEDEEEEEEEE EERE DEED ODED EEOEEEEDEEEEEEEEEEEEEES 
11426 
11427 055652 BGNTST 
055652 T32:: 
11428 000040 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
11429 055652 012737 000040 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (55) 
11430 055660 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
11431 055666 012737 000001 005464 MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
11432 055674 012737 012575 005466 MOV #5501. ,ERRNBR ;SET ERROR NUMBER TO 5501. 
crane 055702 012737 021660 005470 MOV @EMSSO1,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
11434 i¢ 
11435 ; Reset the DUT to a known state, remove the status codes from the fifo. 
11436 ; Clear TX and RX interrupt enable bits in the CSR. 
11437 ; This subroutine reports error >>>>> S501 <<<<<, 
11438 3° 
11439 055710 004737 030172 JSR PC,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
11440 055714 103402 BCS +6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
11441 055716 000137 056336 JMP 60$ sEXIT TEST FATAL ERROR FOUND. 
11442 z+ 
11443 ; Find an active line on which to perform the test. 
11444 3° 
11445 055722 004737 030772 JSR PC ,.FINACT sFIND AN ACTIVE LINE. 
11446 055726 103402 BCS +6 sSKIP EXIT OF TEST IF ACTIVE LINE FOUND. 
11447 055730 000137 056336 JMP 60$ sEXIT TEST. 
11448 3° 
11449 + Initialize the 256 byte data pattern. 
11450 ; Ensure the date pattern is free from XON's or XOFF’s to prevent errors. 
iene ; Note: the first two characters and the last two characters will be the same. 
11452 s- 
11453 055734 004737 031372 JSR PC, INDTPX sINITIALISE DATA PATTERN. 
11454 3+ 
11455 ; Transmit e 256 character data pattern using DMA, on a single channel 
fast ; at 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 
11 3° 
11458 i+ 
11459 ; Set internal loopback, enable IAUTO and receiver on the selected line. 
11460 ; Transmit the first 191 characters on the first available active line. 
11461 3° 
11462 055740 005237 005466 2s: INC ERRNBR ;SET ERROR NUMBER TO 5502. 
11463 055744 012700 000206 MOV #206 ,RO sPASS INTERNAL LOPBCK, ENABLE RX AND IAUTO. 
11464 055750 004737 040250 JSR PC ,WTWLNC sINITIALISE THE LINE CONTROL REGISTER. 
11465 055754 012700 177670 MOV #177670,RO ;PASS THE LPR CONTENTS. 
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11466 055760 004737 040324 JSR PC ,WTWLPR sSET THE LPR CONTENTS TO 38.4K BAUD. 

11467 055764 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 

11468 055770 004737 030370 JSR PC ,.DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

11469 055774 010105 MOV Ri,RS sCOPY THE LINE NUMBER. 

11470 055776 012702 004012 MOV @BUF BAS ,R2 sPASS THE START OF THE DATA PATTERN TO TX. 

11471 056002 012703 000277 MOV #191.,R3 sPASS THE LENGTH OF THE DATA PATTERN. 

11472 056006 004737 030624 JSR PC ,DODMA ;TRANSMIT THE DATA PATTERN. 

ety 056012 103147 Bcc 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 

1 

11475 3+ 

11476 ; Wait for DMA to complete, then wait for the last character to arrive in 

11477 ; the fifo. 

11478 3° 

11479 056014 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 5503. 

11480 056020 012701 170454 MOV #170454,R1 sPASS TIME-OUT VALUE OF 300 MILLI SECS. 

11481 056024 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 

11482 056030 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 

11483 056034 103136 BCC 50$ sIF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 

11484 056036 012704 000005 MOV #5,R4 sPASS DELAY OF 5 MILLI SECS. 

re 056042 004737 030370 JSR PC ,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
486 3¢ 

edd ; Transmit a null character which will cause an XOFF to be generated. 

1 = 

11489 056046 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5504. 

11490 056052 010501 MOV R5,R1 sPASS THE LINE NUMBER. 

11491 056054 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 

11492 056060 012703 000001 MOV #1,R3 3;PASS THE NUMBER OF 

11493 056064 004737 030624 JSR PC ,.DODMA ;TX A NULL CHARACTER TO CAUSE AN XOFF. 

tte 056070 103120 BCC 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 

11496 3+ 

11497 ; Wait for the XOFF to be received before TX the next 42 characters 

tte ; which will cause a further 21 XOFF's to be generated. 

114 _ 

11500 056072 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5505. 

11501 056076 012701 170012 MOV #170012,R1 sPASS TIME-OUT VALUE OF 10 MILLI SECS. 

11502 056102 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 

11503 056106 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 

11504 056112 103107 BCC 50$ sIF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 

11505 056114 012704 000005 MOV #5,R4 sPASS DELAY OF 5S MILLI SECS. 

ace 056120 004737 030370 JSR PC ,DELAY sWAIT FOR XOFF TO GET INTO THE FIFO. 

11 3° 

To s Initialise the 256 byte date pattern to all nulls. 

11 Tod 

11510 056124 012702 004012 MOV @BUFBAS,R2 sINITIALIZE THE DATA PATTERN TO BE 

11511 056130 105022 4$: CLRB (R2)+ ; ALL NULLS. 

11512 056132 020227 004412 CMP R2,@BUFMID 3 

11513 056136 103774 BLO 4$ ; 

11514 

11515 3+ 

11516 ; Transmit a further 31 null characters which will cause 31 XOFF’s to be 

11517 ; generated. 

11518 3° 

11519 056140 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5506. 

11520 056144 010501 MOV R5,R1 ;PASS THE LINE NUMBER. 

11521 056146 012702 004012 MOV OBUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 

11522 056152 012703 000037 MOV $31. ,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
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11523 
11524 
11525 
11526 
11527 
11528 
11529 
11530 
11531 
11532 
11533 
11534 
11535 
11536 
11537 
11538 
11539 
11540 
11541 
11542 
11543 
11544 
11545 
11546 
11547 
11548 
11549 
11550 
11551 
11552 
11553 
11554 
11555 
11556 
11557 
11558 
11559 
11560 
11561 
11562 
11563 
11564 
11565 
11566 
11567 
11568 
11569 
11570 
11571 
11572 
11573 
11574 
11575 
11576 


11577 
11578 


056156 
056162 


056164 
056170 
056174 
056200 
056204 
056206 
056212 


056216 
056220 
056222 
056226 
056234 
056240 
056244 
056246 


056250 
056254 
056260 


056262 
056266 
056270 


056272 
056276 


056300 
056306 
056312 
056314 
056322 


056326 
056326 
056330 





004737 
103063 


005237 
012701 
013702 
004737 
103052 
012704 
004737 


005004 
005003 
012701 
012737 
013702 
004737 
103032 
005204 


005237 
004737 
103422 


122702 
001001 
005203 


020427 
002753 


013737 
022703 
001411 
012737 
012701 


104460 
000402 





SEQ 0291 
- FI3QLA - 
030624 JSR PC ,DODMA ; TRANSMIT THE DATA PATTERN. 
BCC 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 
3 
; Wait for the XOFF's and the null cheracters to be received. 
3 
005466 INC ERRNBR ;SET ERROR NUMBER TO 5507. 
170454 MOV #170454,R1 sPASS TIME-OUT VALUE OF 300 MILLI SECS. 
002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
BCC 50$ sIF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 
000005 MOV #5,R4 sPASS DELAY OF 5 MILLI SECS. 
030370 JSR PC ,DELAY sWAIT FOR XOFF TO GET INTO THE FIFO. 
3;¢ 
; Read the fifo until empty, counting the number of XOFF characters 
; that are found. 
= 
CLR R4 ;CLEAR CHARACTER COUNTER. 
CLR R3 ;CLEAR THE XOFF FOUND COUNTER. 
170001 MOV #170001,R1 sINDICATE TO TEST DATA.VALID BIT, TIME-OUT 1MS. 
012604 005466 6$: MOV #5508. ,ERRNBR sSET UP ERROR NUMBER EACH TIME AROUND THE LOOP. 
002302 MOV RBUFA,R2 sINDICATE TO CHECK RECEIVE BUFFER REGISTER. 
037740 JSR PC ,WAIBIS sWAIT FOR RECEIVED CHAR OR TIME-OUT. 
BCC 50$ 3GO REPORT ERROR IF FIFO EMPTY. 
INC R4 sCOUNT THE CHARACTER. on 
7+ 
; Check if for BMP codes in the fifo, abort the test if any are found. 
; Save the BMP code on the queue to be reported later. 
;- 
005466 INC ERRNBR ;SET ERROR NUMBER TO 5509. 
027256 JSR PC ,CHKBMP ;CHECK IF WE HAVE GOT A BMP CODE. 
BCS 12$ sGO REPORT THE ERROR IF WE FOUND A BMP CODE. 
7? 
; Check for XOFF character. 
000023 8$: CMPB §#23,R2 sCHECK IF THE RECEIVED CHARACTER WAS AN XOFF. 
BNE 10$ sBRANCH IF CHARACTER WAS NOT AN XOFF. 
INC R3 sINCREMENT XOFF FOUND COUNT. 
3*¢ 
; Check if all the characters including the XON have been removed. 
ks 
000400 10$: CMP R4, #256. sCHECK IF WE HAVE REMOVED ALL THE CHARACTERS. 
BLT 6$ 3GO GET THE NEXT CHAR IF WE HAVE NOT FINISHED. 
3¢ 
; Check if the correct number of XOFF's were found in the fifo, 
; report error if count is incorrect. 
37 
012606 005466 MOV 5510.,ERRNBR ;SET UP THE ERROR NUMBER TO 5510. 
000040 CrP $32. ,R3 sCOMPARE EXPECTED XOFF COUNT WITH ACTUAL COUNT. 
BEQ 60$ sEXIT TEST IF SUCCESS. 
024644 005472 MOV ®EROSO3,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
021617 MOV EM5402,R1 sPASS THE MESSAGE TO BE REPORTED. 
sREPORT THE ERROR “FIFO BAD, ALARM SIGNAL DEFECTIVE’. 
12$: ERROR : >>>>> ERROR <<<cc, 



























TRAP CSERROR 





BR 60$ sABORT THE TEST. 
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11579 056332 

11580 056336 

11581 

11582 056342 
056342 
056342 


-— 












SEQ 0292 
- FISQLA - 
004737 036106 50$:; JSR PC, TSABRT sREPORT TEST ABORTED. ERROR @ SHOWS REASON. 
005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
ENDTST 
L10073: 
104401 TRAP CSETST 
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11598 056344 
056344 


11600 056344 
11601 056352 
11602 056360 
11603 056366 
11604 056374 


11610 056402 
11611 056406 
11612 056410 
11613 056414 


11617 056414 
11618 056420 
11619 056422 


11625 056426 


11634 056432 
11635 056436 
11636 056442 
11637 056446 
11638 056452 
11639 056456 


000041 
012737 
012737 
012737 
012737 
012737 


004737 
103402 
000137 


004737 
103402 
000137 


004737 


005237 
012700 
004737 
012700 
004737 
012704 


000041 
177777 
000001 
012741 
021715 


030172 
057026 


030772 
057026 


031372 


005466 
000206 
040250 
177670 
040324 
000012 


002364 
002362 
005464 
005466 
005470 





-SBTTL HARDWARE TEST - FI3QAI - 
b+ PERRRRARARAEAEREEREEREAEEEEEEE DEED DEEDES ERED EE OEOEED EEE EEE EEOOEEEEEEEEEEES 
3% - FIFO 3/4 ALARM LEVEL ACTIVE/INACTIVE TEST - 
3* 
3% This test verifies that the DUT’s fifo 3/4 level alerm system 
3* becomes active and inactive at the correct levels. 
34 Any BMP code found will invalidate the test and cause it to be aborted. 
3% However the BMP code will be placed on the BMP code queue, to be 
;* reported later. 
;* The characters are transmitted on the first available active line, in 
3% internal loopback mode. 
7* 
§ ~~ SRRRREEEREESEREREREEAEAEEEERERAEAARERAEAERAAEEEEEERAEEAEREEERER ED RAEAEEEE RES 

BGNTST _ 

TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (56) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #5601.,ERRNBR ;SET ERROR NUMBER TO 5601. 
MOV @EMS601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 


3¢ 

; Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports error >>>>> 5601 <<<<<, 

;* 


JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS 2s sSKIP EXITING TEST A SUCCESSFUL RESET. 
JMP 60$ sEXIT THIS TEST. 
2s: 
3¢ 
s Find an active line on which to perform the test. 
ge 
JSR PC ,FINACT sFIND AN ACTIVE LINE. 
BCS +6 sSKIP EXIT OF TEST IF ACTIVE LINE FOUND. 
JMP 60$ sEXIT TEST. 


3+ 

; Initialize the 256 byte date pattern. 

; Ensure the date pattern is free from XON'’s or XOFF’s to prevent errors. 

; Note: the first two characters and the last two characters will be the same. 


g° 
JSR PC ,INDTPX sINITIALISE THE DATA PATTERN. 
3¢ 
; Transmit e 256 character date pattern using DMA, on a single channel 
; et 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 
ge 
3? 
; Set internal loopback, enable IAUTO and receiver on the selected line. 
; Transmit the first 191 characters on the first available active line. 
g° 


INC ERRNBR sSET ERROR NUMBER TO 5602. 

MOV #206 ,RO sPASS INTERNAL LOPBCK, ENABLE RX AND IAUTO. 
JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 

MOV #177670,RO0 sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sSET THE LPR CONTENTS TO 38.4K BAUD. 

MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 
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11640 056462 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
11641 056466 010105 MOV R1,R5 ;COPY THE LINE NUMBER 
11642 056470 012702 004012 MOV OBUFBAS ,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
11643 056474 012703 000277 MOV #191. ,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
11644 056500 0604737 030624 JSR PC ,DODMA + TRANSMIT THE DATA PATTERN. 
pete 056504 103146 Bcc 50$ sEXIT IF ERROR FOUND DURING DMA TX. 
1 3+ 
11647 ; Wait for DMA to complete, then wait for the last character to arrive in 
11648 ; the fifo. 
11649 3° 
11650 056506 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5603. 
11651 056512 012701 170454 MOV #170454,R1 sPASS TIME-OUT VALUE OF 300 MILLI SECS. 
11652 056516 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
11653 056522 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
11654 056526 103135 BCC 50$ sBRANCH IF FIFO EMPTY, ABORT THE TEST. 
11655 056530 012704 000005 MOV #5,R4 sPASS DELAY OF 5 MILLI SECS. 
ost 056534 004737 030370 JSR PC ,.DELAY ;WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
11658 3¢ 
peed ; Transmit a null character which will cause an XOFF to be generated. 
ge 
11661 056540 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5604. 
11662 056544 010501 MOV R5,R1 ;PASS THE LINE NUMBER. 
11663 056546 012702 004012 MOV OBUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
11664 056552 012703 000001 MOV #1,R3 ;PASS THE NUMBER OF 
11665 056556 004737 030624 JSR PC ,DODMA 3TX A NULL CHARACTER TO CAUSE AN XOFF. 
et] 056562 103117 BCC 50$ sABORT THE TEST IF ERROR FOUND DURING DMA TX. 
3 
nace ; Wait for the XOFF to be received before continuing the test. 
g@ 
11670 056564 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 5605. 
11671 056570 012701 170012 MOV #170012,R1 s;PASS TIME-OUT VALUE OF 10 MILLI SECS. 
11672 056574 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
11673 056600 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
11674 056604 103106 BCC 50$ ;IF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 
11675 056606 012704 000005 MOV #5,R4 ;PASS DELAY OF 5 MILLI SECS. 
ert 056612 004737 030370 JSR PC ,DELAY sWAIT FOR XOFF TO GET INTO THE FIFO. 
6 
peek 056616 010577 123456 MOV RS,@CSRA ;SELECT THE LINE READY FOR TRANSMISSION. 
116 3+ 
11680 ; Read three characters, transmit one character until the first 192 cheracters 
11681 ; have been read from the fifo, ie until the half level is reached. 
11682 ; Then read the fifo until empty. 
pete ; Count all XOFF‘s thet are detected. 
11 ge 
11685 056622 005005 CLR R5 sCLEAR THE TX FLAG. 
11686 056624 005004 CLR R4 ;CLEAR THE CHARACTER COUNTER. 
pred 056626 012703 000300 MOV #192. ,R3 ;SET UP READ COUNTER FOR THE FIRST 192 CHARS. 
11689 056632 012700 000003 4$; MOV #3,RO ;SET READ COUNTER. 
11690 056636 012701 170005 6$: MOV #170005,R1i sINDICATE TO TEST DATA.VALID BIT, TIME-OUT SMS. 
11691 056642 013702 002302 MOV RBUFA,R2 sINDICATE TO CHECK RECEIVE BUFFER REGISTER. 
11692 056646 004737 037740 JSR PC ,WAIBIS sWAIT FOR RECEIVED CHAR OR TIME-OUT. 
11693 056652 103046 BCC 14$ sEXIT LOOP IF TIME-OUT, FIFO EMPTY. 
11694 056654 005300 DEC RO ;DECREMENT READ COUNTER. 
11695 056656 005303 DEC R3 ;DECREMENT CHAR COUNTER. 
11696 056660 003002 BGT 8$ ;SKIP DISBL'G TX IF FIRST 192 CHARS NOT READ. 
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11697 
11698 
11699 
11700 
11701 
11702 
11703 
11704 
11705 
11706 
11707 
11708 
11709 
11710 
11711 
11712 
11713 
11714 
11715 
11716 
11717 
11718 
11719 
11720 
11721 
11722 
11723 
11724 





056662 


056666 
056674 
056700 


056702 
056706 
056710 


056712 
056714 
056716 
056720 
056722 
056730 


056732 
056736 
056742 
056746 
056752 
056754 
056760 
056764 
056766 


056770 
056776 
057002 
057004 
057012 


057016 
057016 
057020 


057022 
057026 


057032 
057032 
057032 


052705 


012737 
004737 
103446 


122702 
001001 
005204 


005700 
001350 
005705 
100744 
012777 
010446 


005237 
012701 
013702 
004737 
103023 
012704 
004737 
012604 
000721 


012737 
020427 
001411 
012737 
012701 


104460 
000402 


004737 
005037 


104401 


- FI3QAI - 


100000 


012746 
027256 


000023 


100000 


005466 
170012 
002300 
037740 


000005 
030370 


012750 
000077 


024644 
021617 


036106 
002362 





BIS 


@BIT15,R5 
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sDISABLE ANY FURTHER TRA: 'SMISSIONS. 


3° 
; Check if the read character is a BMP code. 

; If it is a BMP code save it on the queue to be reported later, and 
; abort the test. 


MOV 
JSR 
BCS 


i- 
005466 83: 


#5606. ,ERRNBR 
PC ,CHKBMP 
16% 


3¢ 
; Check for XOFF character. 
; Transmit ea null character until the first 192 chars have been read. 


10$: 


12$: 


123352 


3¢ 


#100000, 8TXCHA 
R4,-(SP) 


;SET UP ERROR NUMBER EACH TIME AROUND LOOP. 
sCHECK IF CHARACTER IS A BMP CODE. 
sGO REPORT ERROR AND ABORT TEST IF BMP FOUND. 


If one is found, count it. 


sCHECK IF THE RECEIVED CHARACTER WAS AN XOFF. 
sBRANCH IF CHARACTER WAS NOT AN XOFF. 
sINCREMENT THE XOFF CHAR FOUND COUNTER. 


sCHECK READ COUNT, TO SEE IF A CHAR CAN BE TX. 
sBRANCH IF 3 CHARS NAVE NOT YET BEEN READ. 
sCHECK THE TRANSMISSION ENABLED FLAG. 

sSKIP TRANSMITTING A CHARACTER IF TX DISABLED. 
sTX A NULL CHARACTER. 

sSAVE THE XOFF COUNT ON THE STACK. 


the character to be received before continuing the test. 


ERRNBR 
#170012,R1 
CSRA ,R2 
PC, ,WAIBIS 
50$ 


oS .R4 

PC ,DELAY 
(SP)+,R4 
4s 


sSET ERROR NUMBER TO 5607. 

sPASS TIME-OUT VALUE OF 10 MILLI SECS. 

sPASS THE ADDRESS OF THE CSR. 

sWAIT FOR OMA TO COMPLETE, TX_ACTION SET. 

sIF NO TX_ACTION WAS RECEIVED, ABORT THE TEST. 
sPASS DELAY OF 5 MILLI SECS. 

sWAIT FOR XOFF TO GET INTO THE FIFO. 

sRESTORE THE XOFF COUNT. 

sGO RESET THE READ COUNT AND GET NEXT CHAR. 


* cheek if the correct number of XOFF's were found in the fifo 
Report error if count is incorrect. 


005466 14s: 
005472 


16%: 


50$: 
60$: 


#5608. ,ERRNBR 
R4, 063. 

60$ 

#€ROSO3, ERRBLK 
@€MS402, 


sSET ERROR NUMBER TO 5608. 

sCOMPARE THE EXPECTED AND ACTUAL XOFF COUNTS. 
sEXIT TEST IF SUCCESS. 

sSELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 


Ri 
THE ERROR “FIFO te ALARM SIGNAL DEFECTIVE’. 


60$ 


PC, TSABRT 
CTRLCF 


>>>>> ERROR <<ccc, 
TRAP 
;EXIT THIS TEST. 
s;REPORT TEST ABORTED. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10074: 


TRAP CsETST 


CSERROR 


ERROR @ INDICATES FAULT. 


SEQ 0295 
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SEQ 0296 
HARDWARE TEST - FIHAVL - 
11751 .SBTTL HARDWARE TEST - FIHAVL - 
11752 3% 6800060006466 00666664666 6606066066 6606066 66066460 666666 6606006060606 060604606666060464006460608 
rete 3% - FIFO HALF LEVEL ACTIVE/INACTIVE TEST - 
11 3% 
11755 3* This test checks that the DUT's fifo half level elerm system 
11756 ;* becomes active and inactive at the correct levels. 
11757 ;* Any BMP code found will invalidate the test and cause it to be aborted. 
11758 ;* However the BMP code will be placed on the BMP code queve, to be 
11759 34 reported leter. 
11760 3% The characters are transmitted on the first available active line, in 
11761 34 internal loopback mode 
11762 ;* 
11763 $7 200000060606 606064666 606060066066 60046066 664006 0660604606 004600646666606066 6646606606064 66066006 
11764 
11765 057034 BGNTST 
057034 734; 

11766 000042 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME Test COUNTER. 
11767 057034 012737 000042 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (57) 
11768 057042 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
11769 057050 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
11770 057056 012737 013105 005466 MOV #5701. ,ERRNBR ;SET ERROR NUMBER TO 5701. 
11771 057064 012737 021763 005470 MOV @EMS5701,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
aie 057072 012737 024644 005472 MOV @EROSO3,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
11 3¢ 
11774 ; Reset the DUT to a known state, remove the stetus codes from the fifo. 
11775 ; Clear TX end RX interrupt enable bits in the CSR. 
the ; This subroutine reports error >>>>> S701 <<<<<, 
11 8° 
11778 057100 004737 030172 JSR PC ,CLNRST s;RESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
11779 057104 103402 6cs 23 ;SKIP EXITING TEST A SUCCESSFUL RESET. 
11780 057106 000137 057472 JMP 60$ sEXIT THIS TEST. 
11781 057112 2s: 
11782 s¢ 
pte ; Find ean active line on which to perform the test. 
11784 3° 
11785 057112 004737 030772 JSR PC ,.FINACT sFIND AN ACTIVE LINE. 
ey 057116 103165 Bcc 60$ sEXIT IF NO ACTIVE LINES AVAILABLE. 

3¢ 
11788 ; Initialize the 256 byte dete pettern. 
11789 ; Ensure the date pettern is free from XON'’s or XOFF's to prevent errors. 
they ; Note: the first two cherecters end the lest two cherecters will be the same. 

‘- 
1th 057120 004737 031372 JSR PC, INDTPX sINITIALISE THE DATA PATTERN. 
11 s¢ 
11794 ; Fill the fifo by trensmittin = chers Cie 225 + 31 XOFF's). 
11795 ; Transmit dete pattern using on e single chennel 
tte: ; et 38.4k baud, 8 bits per Lan Kd odd perity, 2 stop bits. 
11 3° 
11798 s¢ 
11799 ; Set internal loopbeck, eneble IAUTO and receiver on the selected line. 
pres ; Trenemit the 225 cherecters on the first eveileble ective line. 

i 

11802 057124 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 5702. 
11803 057130 004737 035672 JSR PC ,SETPAR ;SET UP PARAMETERS FOR TRANSMISSION. 
11804 057134 012700 000341 MOV 225. ,RO sPASS LENGTH OF DATA PATTERN. 
11805 057140 004737 036220 JSR PC, TXDATP sTRANSMIT DATA PATTERN. 
11806 057144 103150 Bcc 50$ ;EXIT IF ERROR FOUND DURING TX. 




















11807 
11808 
11809 
11810 


057146 010105 


005237 
004737 
103142 


103115 


005237 
012700 
004737 
103106 
005237 
005701 
001100 


012700 
010501 
005237 
004737 
103072 


005237 
004737 
103065 


- FIHAVL - 


005466 
040014 


005466 
040014 


3° 
; Reed the first 130 cherecters from the fifo. 


+ report the error. If any BHP codes ere found then save them on the queue 


3¢ 
3 pa DMA to complete, then wait for the lest cherecter to errive in 
; the fi 


MOV 


INC 
JSR 
Bcc 
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HARDWARE TEST 


R1,R5 


ERRNBR 
PC ,WAITTX 
508 


; end abort the test. 


123060 


3° 
+ Read three cherecters, to ceuse the XON to be genereted. 


3¢ 
: Trenemit 62 cherecters to brecket the XON and fill the fifo with 191 chers. 


3° 
3; Reed the first 126 cherecters. 


3¢ 
‘ 
t- 


s¢ 
; ae DMA to complete, then weit for the lest cherecter to errive in 
3 @ 


Trenemit e null cherecter. 


RS ,@CSRA 
#100000, STXCHA 
ERRNBR 


PC ,WAITTX 
508 


#62. .RO 
RS ,.R1 


ERRNBR 
PC, TXDATP 
50% 


SEQ 0297 








sCOPY THE LINE NUMBER. 







sSET ERROR NUMBER TO 5703. 
sWAIT FOR TRANSMISSION TO COMPLETE. 
sGO REPORT ERROR IF TX FAILED TO COMPLETE. 






if any XON's ere found 







sSET ERROR NUMBER TO 5704. 

sPASS THE NUMBER OF CHARS TO READ. 

sREAD THE FIRST 130 CHARS FROM THE FIFO. 
sGO REPORT ERROR IF BMP CODE FOUND. 

sSET ERROR NUMBER TO 5705. 

sCHECK IF AN XON WAS FOUND. 

sGO REPORT ERROR IF AN XON WAS FOUND. 











sSELECT THE LINE READY FOR TRANSMISSION. 
sTRANSMIT A NULL CHARACTER. 

sSET ERROR NUMBER TO 5706. 

sWAIT FOR TX TO COMPLETE. 

sGO REPORT ERROR IF TX DID NOT COMPLETE. 







sSET ERROR NUMBER TO 5707. 

sSET THE READ COUNT TO 3. 

sREAD 3 CHARACTERS FROM THE FIFO. 
sGO REPORT ERROR IF FIFO EMPTY. 

sSET ERROR NUMBER TO 5708. 

sCHECK IF AN XON WAS FOUND. 

sGO REPORT ERROR IF AN XON WAS FOUND. 









sPASS LENGTH OF DATA PATTERN. 
sPASS THE LINE NUMBER. 

sSET ERROR NUMBER TO 5709. 

s TRANSMIT DATA PATTERN. 

sEXIT IF ERROR FOUND DURING TX. 









sSET ERFOR NUMBER TO 5710. 
SWAIT FOR TX TO COMPLETE. 
sGO REPORT ERROR IF TX FAILED TO COMPLETE. 





















HARDWARE TEST 






11867 057314 
11868 057320 
11869 057324 
11870 057330 
11871 057332 
11872 057336 
11873 057340 
11874 057342 
11875 057346 
11876 057352 
11877 057356 
11878 057360 
11879 057364 
11880 057366 
11881 057372 
11882 057374 


11886 057410 
11887 057414 
11888 057416 


11907 057466 

11908 057472 

11909 

11910 057476 
057476 
057476 





036106 
002362 
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s Read the next 4 cherecters and check if they 


s NULL, XOFF, XON, NULL. 


1° 
s Reed the remaining cherecters 


i 
6$: MOV 


S0¢: JSR 


ENOTST 


ERRNBR 
#126 ee RO 
PC ,READBX 
50% 


#61. ,RO 
ERRNBR 


sSET ERROR NUMBER TO 5711. 
sSET UP READ COUNTER. 

sREAD THE FIRST 126 CHARS. 

sGO REPORT THE ERROR IF FIFO EMPTY. 
sSET ERROR NUMBER TO 5712. 

sCHECK IF AN XON WAS FOUND. 

sGO REPORT ERROR IF AN XON WAS FOUND. 
sSET ERROR NUMBER TO 5713. 

sPASS THE MESSAGE TO BE REPORTED. 

sGET THE RECEIVER BUFFER ADDRESS. 

sREAD THE NULL CHARACTER FROM THE FIFO. 
sCHECK IF IT IS A NULL CHARACTER. 

sGO REPORT THE ERROR IF NOT THE SAME. 
sSET ERROR NUMBER TO 5714. 

sREAD THE XOFF FROM THE FIFO. 

sCHECK IF THE READ CHAR IS AN XOFF. 

sGO REPORT THE ERROR IF NOT THE SAME. 
sREAD THE XON FROM THE FIFO. 

sSET ERROR NUMBER TO 5715S. 

iCHECK IF THE READ CHARACTER IS AN XON. 
sGO REPORT THE ERROR IF NOT THE SAME. 
sSET ERROR NUMBER TO 5716. 

sREAD THE NULL CHARACTER FROM THE FIFO. 
sCHECK IF IT IS A NULL CHARACTER. 

sGO REPORT THE ERROR IF NOT THE SAME. 


from the fifo. 


sSET UP READ COUNTER. 

sSET ERROR NUMBER TO 5717. 

sREAD THE FIRST 61 CHARS. 

sGO REPORT THE ERROR IF FIFO EMPTY. 
sSET ERROR NUMBER TO 5718. 

sCHECK IF AN XON WAS FOUND. 

1G0 REPORT ERROR IF AN XON WAS FOUND. 
sEXIT THE TEST. 

’ >>>>> ERROR <<c<< 


TRAP 
sEXIT THE TEST. 


sREPORT TEST ABORTED. 


L10075; 
TRAP 


ere in the following order 


ERROR @ INDICATES FAULT. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


SEQ 0298 

























CeERROR 










CeeTsT 
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HARDWARE TEST - BREAKB - 






SEQ 0299 






















11912 .SBTTL HARDWARE TEST - BREAKB - 
11913 PARP PC ET IIIT IIT iit iiiiiiiiiii iii til tii TTTiTTTTTTTTTiTiTiritviririrTT TTT TT TTTT eT 
11914 16 - BREAK generation test - 
11915 34 This test verifies thet ell serial transmit lines can generate « break 
11916 34 by setting the brk bit in the associated LNCTRL register. 
11917 36 Use of the internal loopback feature of the DUARTS is made to minimise 
11918 3¢ any external effects caused on the serial lines by this test. 
11919 ;¢ Framing error detection is used to indicate the presence of a break, 
11920 34 by setting the appropriete bit in the RBUF register. 
11921 $- -OOOOO OS OSSSKKEEKEKKEEEEEEDS SESEEKEKEKEKAESESEAEKEKEKESKEKEREKEKREKREREDREEEECEEEO 
11922 
11923 057500 BGNTST 
057500 T35:: 
11924 
11925 057500 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
11926 000043 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
11927 057506 012737 000043 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (64) 
11928 057514 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
11929 057522 012737 014401 005466 MOV #6401. ,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
one 057530 012737 022031 005470 MOV @EM6401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
11931 i¢ , 
11932 ; Reset the DUT to a known state, remove the status codes from the fifo. 
11933 ; Clear TX and RX interrupt enable bits in the CSR. 
11934 ; This subroutine reports error >>>>> 6401 <<<<<, 
11935 $- 
11936 057536 004737 030172 JSR PC ,.CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
att 057542 103165 BCC 60$ sEXIT TEST IF FATAL ERROR FOUND. 
119 3° 
11939 ; Set up Device Under Test (DUT) to: 
11940 ’ Disable transmission and reception interrupts. 
ste! 3 Delay for 10 milli-seconds to allow time to clear any breaks. 
11 8° 
11943 057544 004737 036542 JSR PC, TXIEO ;DISABLE TRANSMISSION INTERRUPTS. 
11944 057550 004737 035546 JSR PC ,RXIEO ;DISABLE RECEPTION INTERRUPTS. 
11945 057554 012705 000377 MOV @MAPLNS,RS +PASS ACTIVE LINE BIT MAP. 
11946 057560 012700 000200 MOV #200,RO ;PASS INTERNAL LOOPBACK MODE. 
11947 057564 004737 040250 JSR PC ,WTWLNC sSELECT INTERNAL LOOPBACK,DISABLE DMA. 
11948 057570 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 
heed 057574 004737 030370 JSR PC ,DELAY ;DELAY TO ALLOW ANY BREAKS TO BE CLEARED. 
11 3° 
11951 ; Set up transmission an reception perameters for all lines. 
nose ; 9600 baud,& char,1 stopbit,no parity. 
il 3° 
11954 057600 012700 156430 MOV #156430,R0 sSET UP BAUD RATE,ETC. 
eae 057604 004737 040324 JSR PC ,WTWLPR ;SET COMMUNICATION PARAMETERS ON ALL LINES. 
11 i¢ 
11957 ; Enable transmitters on all active lines. 
11958 s- 
11959 057610 013705 002272 MOV ACTLNS,RS sPASS ACTIVE LINE BIT MAP. 
11960 057614 004737 036446 JSR PC, TXENBL sENABLE TRANSMISSIONS ON ALL LINES. 
11961 3° 
11962 ; Purge the FIFO of any unwanted characters. 
arene ; This routine reports errors with numbers »>>>>> 6402 thru 6404 «<<«<«<<, 
il s- 
11965 057620 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6402. 
11966 057624 004737 033004 JSR PC,PUFIFR sPURGE FIFO. 
11967 057630 103132 BCC 60$ sABORT TEST IF FIFO WILL NOT CLEAR. 
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SEQ 0300 
HARDWARE TEST - BREAKB - 

11968 :* 

11969 3; Verify break generation on individual lines. 

11970 ; Clear breaks on all lines. 

11971 ; Delay for 10 milii-seconds to allow time for any breaks to be cleared. 

11972 ; Select line,set break bit in LNCTRL register. 

+ bay ; Test for a character in the FIFO with i error. 

11974 :- 

11975 057632 005002 2s: CLR R2 sCLEAR LINE COUNTER. 

11976 057634 012703 000001 MOV #1,R3 sSET UP ACTIVE LINE BIT MASK. 

11977 057640 030337 002272 4$: BIT R3,ACTLNS s;CHECK IF THIS LINE IS ACTIVE. 

11978 057644 001434 BEQ 83 3GO SELECT NEXT LINE IF THIS ONE IS INACTIVE. 

11979 057646 012700 000200 MOV #200 ,RO ;SET UP PARAMETER TO CLEAR BREAK BITS. 

11980 057652 004737 040250 JSR PC ,WTWLNC sCLEAR BREAK BIT,RESELECT INTERNAL LOOPBACK. 

11981 057656 012704 000012 MOV #10. ,.R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 

teen 057662 004737 030370 JSR PC ,DELAY sDELAY TO ALLOW BREAKS TO BE CLEARED. 

il ze 

11984 ; Set break bit on selected line. 

11985 ; Set up perameters to test for the frame error bit set in RBUF. 

11986 ; Time-out = 5 milli seconds. 

11987 ; Call routine to check for condition found. 

11988 3° 

11989 057666 010305 6$: MOV R3,R5 ;COPY ACTIVE LINE BIT MASK. 

11990 087670 012700 000214 MOV @214,R0 ;SET BREAK ,RESELECT LOOPBACK ENABLE RECEPTION. 

11991 057674 004737 040250 JSR PC ,WTWLNC ;SET BREAK ON SELECTED LINE. 

11992 3° 

11993 ; Delay for 5 ms to allow time for break to be generated and received. 

hee ; Verify reception of a character with frame error bit set. 

1199 = 

11996 057700 012704 000005 MOV #5. ,R4 -SCT DELAY VALUE TO 5 MILLI SECS. 

11997 057704 004737 030370 JSR PC ,DELAY ;ALLOW TIME FOR CHARACTER RECEPTION. 

11998 057710 017700 122366 MOV ORBUFA,RO ;GET CHARACTER FROM RBUF REGISTER. 

11999 057714 032700 020000 BIT #B81T13,R0 ;CHECK FOR FRAME ERROR BIT. 

12000 057720 001006 BNE 83 sSKIP ERROR REPORT IF SET. 

12001 057722 012701 022060 MOV #E€M6402,R1 ;SELECT MESSAGE TO BE PRINTED. 

12002 ;REPORT ERROR”BREAK NOT RECEIVED ON LINE @nn” 

12003 057726 ERRDF 6405,€M6401,ER6401 ; >>>>> ERROR 96405 <<<cc,. 
057726 104455 TRAP CSERDF 
057730 014405 -WORD 6405 
057732 022031 -WORD EM6401 
057734 025204 -WORD ER6401 

12004 057736 006303 8$: ASL R3 ;SHIFT BIT MASK FOR NEXT LINE. 

12005 057740 005202 INC R2 sNEXT LINE 

12006 057742 020227 000010 CMP R2, @NUMLNS ;CHECK FOR MAX LINE COUNT. 

12007 057746 001334 BNE 4% ;IF <>,LOOP TO CHECK NEXT LINE 

12008 3° 

12009 ; Verify break generation on all lines simultaneously. 

12010 ; Clear breaks on all lines. 

12011 ; Delay for 10 milli-seconds to allow time for any breaks to be cleared. 

12012 ; Purge the FIFO. 

12013 ; Set break bit in LNCTRL registers on all active lines. 

peep ; Test for characters in the FIFO with frame error. 

1201 3° 

12016 057750 012705 000377 MOV OMAPLNS,RS ;SET UP LINE TO CLEAR BREAKS ON. 

12017 057754 012700 000200 MOV #200 ,RO ;SET UP PARAMETER TO CLEAR BREAK BITS. 

12018 057760 004737 040250 JSR PC ,WTWLNC ;CLEAR BREAK BIT,RESELECT INTERNAL LOOPBACK. 

12019 057764 012704 000012 MOV #10. ,.R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 

12C20 057770 004737 030370 JSR PC ,DELAY ;DELAY TO ALLOW BREAKS TO BE CLEARED. 
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SEQ 0301 



















12021 ie 

scone ; Purge the FIFO of unwanted cheracters. 

12 3° 

12024 057774 004737 032722 JSR PC ,PUFIFO ;PURGE FIFO. 

poet 060000 103044 Bcc 50$ sGO REPORT ERROR IF FAILED TO CLEAN_OUT FIFO. 

1 3° 

12027 ; Set up peraemeters for setting the break bit on all active lines. 

oes ; Then call routine to do it. 

12 3° 

12030 060002 013705 002272 10$: MOV ACTLNS,RS ;SET UP ACTIVE LINE BIT MASK. 

12031 060006 012700 000214 MOV $214 ,RO sSET BREAK ,RESELECT LOOPBACK ,ENABLE RECEPTION. 

pees 060012 004737 040250 JSR PC ,WTWLNC ;SET BREAK ON SELECTED LINES. 

3¢ 

12034 ; Delay for 10 milli seconds,to allow time for reception. 

pen ; Test for characters in fifo with frame error bit set. 

120 3- 

12037 060016 012704 000012 MOV #10. ,R4 ;SET DELAY VALUE TO 10 MILLI SECS. 

12038 060022 004737 030370 JSR PC ,DELAY ;ALLOW TIME FOR CHARACTER RECEPTION. 

12039 060026 010502 MOV RS,R2 sCOPY ACTIVE LINE BIT MAP. 

12040 060030 004737 031674 JSR PC ,MAPCNT s;COUNT THE NUMBER OF LINES AVAILABLE. 

12041 060034 017701 122242 12$: MOV ORBUFA,R1 ;GET CHARACTER FROM RBUF REGISTER. 

12042 060040 100011 BPL 14$ sBRANCH IF DATA_VALID NOT SET. 

12043 060042 032701 020000 BIT @BIT13,R1 ;CHECK FOR FRAME ERROR BIT. 

12044 060046 001406 BEQ 14$ ;00 NOT CLR FLG FOR THIS LINE IF FRAME BIT CLR. 

12045 060050 000301 SWAB R1 ;GET LINE NUMBER IN LOW BYTE. 

12046 060052 042701 177400 BIC $177400,R1 ;CLEAR EVERTHING BUT THE LINE NUMBER. 

12047 060056 004737 031646 JSR PC .LINBIT ;CALC BIT MASK FROM LINE NUMBER. 

12048 060062 040005 BIC RO,RS ;CLEAR LINE FLAG. 

12049 060064 005302 14$; DEC R2 sDECREMENT THE LINE NUMBER COUNTER. 

12050 060066 001362 BNE 12$ ;LOOP TO GET THE NEXT CHARACTER. 

12051 060070 005705 TST RS s;CHECK IF ANY BREAKS NOT RECEIVED. 

12052 060072 001411 BEQ 60$ sEXIT TEST IF ALL CLE’ 

12053 060074 012701 022060 MOV @€M6402,R1 ;SELECT MESSAGE TO BE PRINTED. 

12054 ;REPORT ERROR”BREAK NOT RECEIVED ON LINE @nn”. 

12055 060100 ERRDF 6406,EM6401,ER6401; >>>>> ERROR 96407 <<<<<, 
060100 104455 TRAP CSEROF 
060102 014406 -WORD 6406 
060104 022031 -WORD EM6401 
060106 025204 -WORD ER6401 

_— 060110 000402 BR 60$ sEXIT THE TEST. 

12 

12058 060112 004737 036106 50$: JSR PC, TSABRT ;ABORT THE TEST. 

12059 060116 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

12060 060122 ENDTST 
060122 L10076: 

060122 104401 TRAP CSETST 
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HARDWARE TEST - NORERR - 
12062 -SBTTL HARDWARE TEST - NORERR - 
12063 FO ORMRARSAAEEEEEAEEAERESEEEARERSSAAEEREEARESEAAREEERAREEEREREREREREDEEEEREEEOES 
12064 34 - NO OVERRUN ERROR TEST - 
12065 ;* 
12066 7 This test verifies that the DUT will not report date overrun 
12067 34 errors when they do not occurr. 
12068 3% This test puts 256 characters in the DUT FIFO plus 4 in each active 
12069 i* UART and verifies that no overrun errors are reported. 
12070 34 Any BMP code found will invalidate the test and cause it to be aborted. 
12071 ;* However the BMP code will be placed on the BMP code queue, to be 
12072 3* reported later. 
12073 3* 
12074 t- ~SRRESEEAAAEEAAEREAAESEAEAEEEEEARAAEAEEEEEEARAEEAAEEEDEEEEESEREEEEEDEREEEREESE 
12075 
12076 060124 BGNTST 
060124 T36:: 
12077 000044 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
12078 060124 012737 000044 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (66) 
12079 060132 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
12080 060140 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
12081 060146 012737 014711 005466 MOV $6601. ,ERRNBR ;SET ERROR NUMBER TO 6601. 
peer 060154 012737 022121 005470 MOV EM6601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
3* 
12084 ; Reset the DUT to a known state, remove the status codes from the fifo. 
12085 ; Clear TX and RX interrupt enable bits in the CSR 
12086 ; This subroutine reports error >>>>> 6601 <<<<<, 
12087 3° 
12088 060162 004737 030172 JSR PC ,.CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
12089 060166 103402 BCS +6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
ees 060170 000137 060616 JMP 60$ sEXIT THE TEST, FATAL ERROR WAS FOUND. 
12091 i+ 
12092 ; Find an active line on which to perform the test. 
oe ; Initialize the 256 byte dete pattern. 
1 4 3° 
12095 060174 004737 030772 JSR PC .FINACT sFIND AN ACTIVE LINE. 
12096 060200 103402 BCS +6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
12097 060202 000137 060616 JMP 60$ sEXIT THE TEST, FATAL ERROR WAS FOUND. 
or 060206 004737 031342 JSR PC, INDATP sINITIALISE DATA PATTERN. 
12 3¢ 
12100 ; Transmit a 265 character data pattern using DMA, on a single channel 
tp ; at 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 
1 ' 
12103 3? 
12104 ; Set internal loopback on the selected line. 
ao ; Transmit the data pattern on the first available active line. 
12 8° 
12107 060212 005237 005466 INC ERRNBR ;SET THE ERROR REPORT NUMBER TO 6602. 
12108 060216 012700 000204 MOV $204 ,RO sPASS PARAMETER FOR INTERNAL LOPBCK,ENABLE RX. 
12109 060222 004737 040250 JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 
12110 060226 012700 177670 MOV #177670,RO0 ;PASS THE LPR CONTENTS. 
412111 060232 004737 040324 JSR PC ,WTWLPR ;SET THE LPR CONTENTS TO 38.4K BAUD. 
12112 060236 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 
12113 060242 004737 030370 JSR PC ,DELAY s;WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
12114 060246 012702 004012 MOV OBUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
12115 060252 012703 000400 MOV @BUFMID-BUFBAS,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
12116 060256 004737 030624 JSR PC .DODMA ;TRANSMIT THE DATA PATTERN. 
12117 060262 103153 BCC 50$ sEXIT IF ERROR FOUND DURING DMA TX. 
t _—— ee ee 
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SEQ 0303 
HARDWARE TEST - NORERR - 

12118 i¢ 
12119 i Wait for DMA to complete, then wait for the last character to arrive in 
12120 3; the fifo. 
12121 s- 
12122 060264 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6603. 
12123 060270 012701 170536 MOV #170536,R1 sPASS TIME-OUT VALUE OF 350 MILLI SECS. 
12124 060274 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
12125 060300 004737 037740 JSR PC ,WAIBIS sWAIT FOR DMA TO COMPLETE, TX_ACTION SET. 
12126 060304 103142 BCC 50$ sABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 
12127 060306 012704 000005 MOV @5,R4 sPASS DELAY OF 5 MILLI SECS. 
yt 060312 004737 030370 JSR PC ,DELAY ;WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
12130 3+ 
tT ; Transmit 4 characters on each active line. 

132 = 
12133 060316 013705 002272 MOV ACTLNS,RS sALTER PARAMETERS FOR ALL ACTIVE LINES. 
12134 060322 012700 000204 MOV #204,RO0 sPASS PARAMETER FOR INTERNAL LOPBCK,ENABLE RX. 
12135 060326 004737 040250 JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 
12136 060332 012700 177670 MOV #177670,R0 ;PASS THE LPR CONTENTS. 
12137 060336 004737 040324 JSR PC ,WTWLPR ;SET THE LPR CONTENTS TO 38.4K BAUD. 
12138 060342 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 
12139 060346 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
12140 
12141 060352 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
12142 060356 012703 000004 MOV 04,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
12143 060362 005001 CLR R1 ;CLEAR THE LINE COUNTER. 
12144 060364 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6604. 
12145 060370 010100 2s: MOV R1,RO0 
12146 060372 006300 ASL RO sCALCULATE THE LINE OFFSET FROM THE LINE @. 
12147 060374 036037 002534 002272 BIT BITTBL(RO),ACTLNS ;TEST FOR THIS LINE BEING ACTIVE. 
12148 060402 001403 BEQ 4$ sSKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 
12149 060404 004737 030624 JSR PC ,DODMA ;TRANSMIT THE S CHAR DATA PATTERN. 
12150 060410 103100 BCC 50$ sABORT IF ERROR FOUND DURING DMA TX. 
12151 060412 005201 4$: INC R1 sINCREMENT THE LINE COUNTER. 
12152 060414 020127 000010 CMP R1,@NUMLNS sTEST FOR ALL POSSIBLE LINES HANDLED 
ttt 060420 002763 BLT 2s ;LOOP IF NOT ALL LINES HANDLED. 
12155 060422 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6605. 
12156 060426 012701 170040 MOV #170040,R1 sPASS TIME-OUT VALUE OF 32 MILLI SECS. 
12157 060432 013702 002300 MOV CSRA,R2 ;PASS THE ADDRESS OF THE CSR. 
12158 060436 004737 037740 JSR PC ,WAIBIS sWAIT FOR A DMA TO COMPLETE, TX_ACTION SET. 
12159 060442 103063 BCC 50$ ;ABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 
12160 060444 012704 000005 MOV @5,R4 sPASS DELAY OF 5 MILLI SECS. 
te 060450 004737 030370 JSR - PC,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
1216 3+ 
12163 ; Read the FIFO checking for overrun errors. Report errors if found. 
oohes ; Abort the test if a BMP code was found in the fifo. 
1216 - 
12166 060454 013702 002272 MOV ACTLNS ,R2 
12167 060460 004737 031674 JSR PC ,MAPCNT ;GET THE NUMBER OF ACTIVE LINES. 
12168 060464 006302 ASL R2 
12169 060466 006302 s ASL R2 sMULTIPLY NUMBER OF ACTIVE LINES BY 4. 
12170 060470 012705 000400 MOV $256.,R5 
12171 060474 060205 ADD R2,R5 ;CALCULATE NUMBER OF CHARACTERS TO RX. 
12172 060476 005004 CLR R4 ;CLEAR THE CHARACTER COUNTER. 
12173 060500 012737 014716 005466 6%: MOV $6606. ,ERRNBR ;SET UP ERROR NUMBER ESCH TIME AROUND LOOP. 
12174 060506 017702 121570 MOV ORBUFA,R2 ;READ A CHARACTER FROM THE FIFO. 





| 
L 
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HARDWARE TEST 


12175 
12176 
12177 
12178 


r-— 


060512 





100032 


004737 
103002 


104460 
000434 


005237 
005204 
020405 
003025 
032702 
001755 
005237 
012737 
012701 
010203 
000303 
042703 


104460 
000740 
012737 
020405 
001402 
004737 
005037 


104401 





- NORERR - 


027256 


005466 


040000 


005466 
025302 
022147 


177760 


014721 


036106 
002362 
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BPL 


10$ 


sEXIT THE READ LOOP IF THE FIFO IS EMPTY. 


3¢ 

; Check if the read character is a BMP code. 

If it is a BMP code save it on the queue to be reported later, and 
abort the test. 


005472 


JSR 
BCC 
ERROR 


PC ,CHKBMP 
8$ 


60$ 
ERRNBR 
R4 


ERRNBR 
€R7801, ERRBLK 
@€M6602,R1 

R2 ,R3 

R3 

#177760,R3 


;CHECK IF CHARACTER IS A BMP CODE. 
;BRANCH IF NOT A BMP CODE. 
3 >>>>> ERROR #6606 <<<<<, 


TRAP CSERROR 
sEXIT THIS TEST. 


sSET ERROR NUMBER 70 6607. 

sCOUNT THIS CHARACTER. 

sCOMPARE @ OF CHARS WITH MAX @ OF CHARS. 
sABORT TEST IF TOO MANY VALID CHARS READ. 
sTEST THE OVERRUN BIT OF THE READ CHAR. 
sLOOP TO READ THE NEXT CHAR IF NO ERROR. 
sSET ERROR NUMBER TO 6608. 

sSELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 


sGET FAILING LINE NUMBER. 


BI 
ct eee ERROR REPORTED WHEN NONE FORCED, ON LINE nn ...” 


6$ 


#6609. ,ERRNBR 
R4,R5 
60$ 


PC, TSABRT 
CTRLCF 





3 >>>>> ERROR #6608 <<<<<, 
TRAP CSERROR 
;LOOP TO READ THE NEXT CHAR. 


sSET ERROR NUMBER TO 6609. 
sCOMPARE NUMBER OF CHARS READ WITH EXPECTED. 
sEXIT TEST WITHOUT ABORT IF CORRECT @ OF CHARS. 


sABORT THE TEST, NON-RELATED TEST ERROR FOUND. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10077: 
TRAP CSETST 








SEQ 0304 
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SEQ 0305 
HARDWARE TEST - ORERR - 
12210 -SBTTL HARDWARE TEST - ORERR - 
12211 b+ + RRRRREREREEAE EEE EREAEE SEEDED DEES OEE EE ODED EE ED OE OEEEOEEEOEEEEE DEERE EERE EOE 
12212 3% - OVERRUN ERROR TEST - 
12213 3% : 
12214 3% This test verifies that the DUT will report data overrun errors when 
12215 He they occurr. 
12216 3% This test puts 256 characters in the DUT FIFO plus 5 in each active 
12217 3% UART and verifies that overrun errors are reported on all active lines. 
12218 3* Any BMP code found will invalidate the test and cause it to be aborted. 
12219 3% However the BMP code will be placed on the BMP code queue, to be 
12220 ;* reported later. 
12221 3* 
12222 §- -SSREEEEROREEEER SEES SAAS EEEEAEEEEEED DEER ES ODED ODED OE ODEO OD OEODOEEE EE EEEEEEERE 
12223 
12224 060624 BGNTST 
060624 T37:: 

12225 000045 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
12226 060624 012737 000045 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (67) 
12227 060632 012737 177777 002362 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
12228 060640 012737 000001 005464 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
12229 060646 012737 015055 005466 MOV #6701. ,ERRNBR ;SET ERROR NUMBER TO 6701. 
aeeee 060654 012737 022221 005470 MOV #EM6701,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

3¢ 
12232 ; Reset the DUT to a known state, remove the status codes from the fifo. 
12233 ; Clear TX and RX interrupt enable bits in the CSR. 
pon ; This subroutine reports error >>>>> 6701 <<<<<, 
122 3° 
12236 060662 004737 030172 JSR PC,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
12237 060666 103402 BCS . +6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
ae 060670 000137 061544 JMP 60$ sEXIT THE TEST, FATAL ERROR WAS FOUND. 
1 9 3° 
12240 ; Find an active line on which to perform the test. 
rete ; Initialize the 256 byte data pattern. 
1 "thea 
12243 060674 004737 030772 JSR PC ,FINACT sFIND AN ACTIVE LINE. 
12244 060700 103402 BCS +6 sIF ACTIVE LINE IS FOUND, DON’T ABORT TEST. 
12245 060702 000137 061544 JMP 60$ sABORT THE TEST, NO ACTIVE LINES WERE FOUND. 
aoe 060706 004737 031342 JSR PC, INDATP sINITIALISE DATA PATTERN. 
1224 3¢ 
12248 ; Transmit a 265 character date pattern using DMA, on a single channel 
pres + at 38.4k baud, 8 bits per character, odd parity, 2 stop bits. 

an 
12251 i+ 
12252 ; Set internal loopback on the selected line. 
pease ; Transmit the data pattern on the first available active line. 

ne 

12255 060712 005237 005466 INC ERRNBR sSET ERROR NUMBER TO 6702. 
12256 069716 012700 000204 MOV #204 ,RO sPASS PARAMETER FOR INTERNAL LOPBCK,ENABLE RX. 
12257 060722 004737 040250 JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 
12258 060726 012700 177670 MOV #177670,RO ;PASS THE LPR CONTENTS. 
12259 060732 004737 040324 JSR PC, ,WTWLPR ;SET THE LPR CONTENTS TO 38.4K BAUD. 
12260 060736 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECONDS. 
12261 060742 004737 030370 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
12262 060746 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
12263 060752 012703 000400 MOV @BUFMID-BUFBAS,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
12264 060756 004737 030624 JSR PC ,DODMA s TRANSMIT THE DATA PATTERN. 
12265 060762 103402 BCS +6 sIF NO ERROR FOUND DURING DMA TX, DON’T ABORT. 
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SEQ 0306 
HARDWARE TEST - ORERR - 

ot 060764 000137 061540 JMP 50$ sABORT TEST, ERROR FOUND DURING DMA TX. 
1226 Hs 
12268 ; Wait for DMA to complete, then wait for the last character to arrive in 
12269 3; the fifo. 
12270 :- 
12271 060770 005237 005466 INC ERRNBR :SET ERROR NUMBER TO 6703. 
12272 060774 012701 170536 MOV #170536,R1 sPASS TIME-OUT VALUE OF 350 MILLI SECS. 
12273 061000 013702 002300 MOV CSRA,R2 sPASS THE ADDRESS OF THE CSR. 
12274 061004 004737 037740 JSR PC ,WAIBIS sWAIT FOR OMA TO COMPLETE, TX_ACTION SET. 
12275 061010 103402 BCS +6 ;IF NO TIME-OUT ON DMA COMPLETION, DON’T ABORT. 
12276 061012 000137 061540 JMP 50$ ;ABORT TEST, TIME-OUT ON DMA COMPLETION. 
12277 061016 012704 000005 MOV o5,R4 sPASS DELAY OF 5 MILLI SECS. 
ote 061022 004737 030370 JSR PC ,DELAY sWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 

3¢ 
inoes :; Transmit 5 characters on each active line. 

40 
12282 061026 013705 002272 MOV ACTLNS RS sALTER PARAMETERS FOR ALL ACTIVE LINES. 
12283 061032 012700 000204 MOV $204 ,RO sPASS PARAMETER FOR INTERNAL LOPBCK,ENABLE RX. 
12284 061036 004737 040250 JSR PC ,WTWLNC sINITILAISE THE LINE CONTROL REGISTER. 
12285 061042 012700 177670 MOV $177670,RO0 ;PASS THE LPR CONTENTS. 
12286 061046 004737 040324 JSR PC ,WTWLPR ;SET THE LPR CONTENTS TO 38.4K BAUD. 
12287 061052 012704 000012 MOV #10. ,R4 ;PASS DELAY TIME OF 10 MILLI SECONDS. 
posed 061056 004737 030370 JSR PC ,DELAY ;WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
12290 061062 012702 004012 MOV @BUFBAS,R2 sPASS THE START OF THE DATA PATTERN TO TX. 
12291 061066 012703 000005 MOV #5,R3 ;PASS THE LENGTH OF THE DATA PATTERN. 
12292 061072 005001 CLR Ri ;CLEAR THE LINE COUNTER. 
12293 061074 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6704. 
12294 061100 010100 2s: MOV R1,RO 
12295 061102 006300 ASL RO ;CALCULATE LINE OFFSET FROM THE LINE @. 
12296 061104 036037 002534 002272 BIT BITTBLC(RO),ACTLNS ;TEST FOR THIS LINE BEING ACTIVE. 
12297 061112 001405 BEQ 4$ ;SKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 
12298 061114 004737 030624 JSR PC ,DODMA sTRANSMIT THE 5 CHAR DATA PATTERN. 
12299 061120 103402 BCS +6 ;IF NO TIME-OUT ON DMA COMPLETION, DON'T ABORT. 
12300 061122 000137 061540 JMP 50$ ;ABORT TEST, TIME-OUT ON DMA COMPLETION. 
12301 061126 005201 4$: INC R1 sINCREMENT THE LINE NUMBER COUNTER. 
12302 061130 020127 000010 CMP R1, @NUMLNS ;TEST FOR ALL POSSIBLE LINES HANDLED 
piety 061134 002761 BLT 2s ;LOOP IF NOT ALL LINES HANDLED. 
1 
12305 061136 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6705. 
12306 061142 012701 170040 MOV #170040,R1 ;PASS TIME-OUT VALUE OF 32 MILLI SECS. 
12307 061146 013702 002300 MOV CSRA,R2 ;PASS THE ADDRESS OF THE CSR. 
12308 061152 004737 037740 JSR PC, ,WAIBIS sWAIT FOR A DMA TO COMPLETE, TX_ACTION SET. 
12309 061156 103170 BCC 50$ sABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 
12310 061160 012704 000005 MOV @5,R4 sPASS DELAY OF 5 MILLI SECS. 
iy 061164 004737 030370 JSR PC ,DELAY ;WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
12312 i¢ 
12313 ; Read 256 chars from the FIFO checking for BMP codes. 
aorta ; Abort the test if a BMP code was found in the fifo. 

1 3- 

12316 061170 012704 000400 MOV $256.,R4 ;SET UP THE CHARACTER COUNTER. 
12317 061174 012737 015062 005466 6%: MOV $6706. ,ERRNBR ;SET UP ERROR NUMBER EACH TIME AROUND LOOP. 
12318 061202 017702 121074 MOV ORBUFA ,R2 sREAD A CHARACTER FROM THE FIFO. 
12319 061206 100154 BPL 50$ ;ABORT THE TEST IF DATA.VALID IS CLEAR. 
12320 061210 005237 005466 INC ERRNBR ;SET ERROR NUMBER TO 6707. 
12321 061214 004737 027256 JSR PC ,CHKBMP ;CHECK IF CHARACTER IS A BMP CODE. 
12322 061220 103545 6CcS 24$ ;REPORT ERROR AND ABORT TEST IF A BMP CODE. 
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HARDWARE TEST 


12323 061222 
12324 061224 


12328 061226 
12329 061230 
12330 061234 
12331 061240 
12332 061246 
12333 061252 
12334 061254 
12335 061260 
12336 061262 
12337 061266 
12338 061270 
12339 061272 
12340 061276 
12341 061300 
12342 061304 
12343 061312 
12344 061314 
12345 0€1320 
12346 061324 
12347 061326 
12348 061332 
12349 061334 
12350 061340 
12351 061342 
12352 061350 
12353 061352 
12354 061356 
12355 061360 
12356 061364 
12357 061370 


12363 061372 
12364 061374 
12365 061402 
12366 061410 
12367 061412 
12368 061420 
12369 061422 
12370 061426 
£2371 061430 
12372 061434 
12373 061442 
12374 061444 
12375 061450 
12376 061454 


005304 
001363 


003712 
030214 
015064 
121030 
027256 


005466 


177760 


007400 
002534 


005466 
003712 


140000 
002534 
003712 
040000 


002534 
003712 


015067 
002534 


003712 
002534 


005466 
003712 


000002 
000020 





005466 


002272 


000004 


005466 
002272 


000002 


000002 


DEC R4 sCOUNT THIS CHARACTER. 
BNE 6$ sLOOP IF NOT 256 CHARS READ FROM FIFO. 
3¢ 
; Read the remaining and verify 1 overrun plus 1 char from each line. 
Td 
CLR R4 s;CLEAR THE OVERRUN ERROR FLAGS. 
MOV ORXCNTB,RO 
JSR PC, ,CLRi6W sCLEAR RX CHAR COUNT TABLE. 
8$: MOV #6708.,ERRNBR ;SET UP ERROR NUMBER EACH TIME AROUND LOOP. 
MOV ORBUFA ,R2 sREAD A CHARACTER FROM THE FIFO. 
BPL 14$ sGO ANALYZE THE RESULTS IF ALL CHARS READ. 
JSR PC, CHKBMP sCHECK IF CHAR IS A BMP CODE. 
BCS 243 sREPORT ERROR AND ABORT TEST IF A BMP CODE. 
INC ERRNBR SET ERROR NUMBER TO 6709. 
MOV R2,RO0 
SWAB RO 
BIC $17776C6,RO sCALCULATE THE LINE NUMBER OF THE CHAR. 
ASL RO sFORM WORD TABLE OFFSET FOR TABLE ACCESS. 
BIC #7400,R2 sREMOVE LINE NUMBER FROM THE READ CHAR. 
BIT BITTBLC(RO),ACTLNS sTEST FOR ACTIVE LINE. 
BEQ 50$ sABORT TEST IF FOR INACTIVE LINE. 
INC ERRNBR s;SET ERROR NUMBER TO 6710. 
TST RXCNTBCRO) sCHECK THE RX CHAR COUNTER FOR THIS LINE. 
BNE 10$ :IS THIS FIRST CHAR ON LINE? 
CMP R2,4140000 sYES, TEST FOR NULL CHAR WITH OVERRUN. 
BEQ 12$ 3IS CHAR A NULL? 
BIS BITTBL(RO),R4 ;NO, SET THE OVERRUN BIT ERROR FLAG FOR LINE. 
BR 12$ GO COUNT THE CHAR AND CONTINUE. 
10$: CMP RXCNTBCRO) , 04 
BGE 50$ sSTH CHAR ON THIS LINE? YES, ABORT. 


BIT on sNO, CHECK OVERRUN BIT. 


BEQ sIS OVERRUN BIT CLEAR? YES, GO COUNT CHAR. 

BIS BITTBL(RO),R4  ;NO, SET THE OVERRUN BIT ERROR FLAG FOR LINE. 
12$: INC RXCNTBC(RO) sCOUNT THIS CHARACTER. 

BR 8$ sLOOP UNTIL ALL CHARS ARE READ FROM FIFO. 


3° 
; Test for abort conditions. Only none abort conditions ere: 


F 1) 2 chars RXed on a line and no overrun error bit failure detected. 
: 2) 2 to 4 chars RXed on a line and an overrun bit failure detected. 

a 

14%; CLR Ri sINITIALIZE LINE LOOP, CLEAR LINE OFFSET. 


16%: MOV @6711.,ERRNBR ;SET UP ERROR NUMBER EACH TIME AROUND LOOP. 
BIT BITTBLC(R1),ACTLNS 

18% sLINE ACTIVE? NO, NEXT LINE. 
CMP > aaa sYES 


BLT sFEWER THAN 2 CHARS RXED? YES, ABORT. 

BIT BITTBL(R1),R4 ;NO. 
BNE 18$ sOVERRUN BIT ERROR FLAG SET? YES, NEXT LINE. 
INC ERRNBR sSET LINE NUMBER TO 6712. 

CMP RXCNTBC(R1), 02 
BNE 50$ sNOT 2 CHARS RXED? YES, ABORT. NO, NEXT LINE. 

18%: ADD @2,R1 sSET LINE OFFSET TO THE NEXT LINE. 
CMP R1, @NUMLNS#2 
BLT 16% sALL LINES DONE? NO, LOOP. YES, CONTINUE. 


i? 
; Check for overrun error bit failures, print error message if found. 
ge 
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HARDWARE TEST 


12380 061456 
12381 061464 
12382 061466 
12383 061470 
12384 061474 
12385 061476 
12386 061500 
12387 061502 
12388 061510 


12390 061514 

061514 
12391 061516 
12392 061520 
12793 061524 
12394 061526 
12395 061532 


12397 061534 
12398 061534 

061534 
12399 061536 


12401 061540 
12402 061544 


12404 061550 
061550 
061550 





012737 
005001 
010102 
036104 
001411 
010103 
006203 
012737 
012701 


104460 
010201 
046104 
001407 
062701 
000755 


104460 
000402 


004737 
005037 


104401 


- ORERR - 
015071 005466 


002534 


025302 005472 
022244 


002534 


000002 


036106 
002362 


208: 


22%: 


243: 


50$: 
60$: 
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MOV a 
1 


CLR 

MOV R1,R2 

BIT BITTBL(R1),R4 
BEQ 22$ 

MOV R1,R3 

ASR R3 

MOV #€R7801, ERRBLK 


#€M6702,R1 


sSET UP ERROR NUMBER. 

sINITIALIZE LOOP. CLEAR LINE OFFSET. 
sCOPY THE LINE OFFSET. 

sOVERRUN BIT FAILURE FLAGS ARE IN R4. 
sERROR FLAG CLEAR? YES, NEXT LINE. 


sCALCULATE LINE NUMBER FROM LINE OFFSET. 
;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 


MOV 
_——- ERROR NOT REPORTED CORRECTLY WHEN FORCED, ON LINE nn ...” 


; >>>>> ERROR 86713 €C0C, 

TRAP CSERROR 
sRESTORE THE LINE OFFSET THAT WAS DESTROYED. 
s;CLEAR THE LINE ERROR FLAG WE JUST HANDLED. 
sALL FAILURE BITS HANDLED? YES, EXIT TEST. 
sNO, INCREMENT THE LINE OFFSET. 

;LOOP TO HANDLE THE NEXT LINE. 


sREPORT “BMP CODE FOUND IN FIFO, TEST INVAILDATED. ” 


MOV R2,R1 

BIC BITTBL(R1),R4 
BEQ 60$ 

ADD #2,R1 

BR 20$ 

ERROR 

BR 60$ 

JSR PC, TSABRT 

CLR CTRLCF 

ENOTST 





; >>>>> ERROR <<ccc, 

TRAP CSERROR 
sEXIT THIS TEST. 
sABORT THE TEST. ERROR @ INDICATES FAULT TYPE. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10100: 
TRAP CSETST 
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SEQ 0309 
HARDWARE TEST - DMAADR - 
12406 .SBTTL HARDWARE TEST - DMAADR - 
12407 5+ 66660000006 06000000 0000060060606 000000000000 060000000000600606000000000008 
12408 i* - DMA ADDRESSING TEST - 
12409 :* THIS TEST VERIFIES , AS FAR AS POSSIBLE , THAT THE DUT CAN PERFORM A 
12410 ;* DMA FROM A FULL 22 BIT OR 18 BIT ADDRESS. THE TEST RELIES ON FINDING A 
12411 ;@ COMPLEMENTARY PAIR OF ADDRESSES BETWEEN THE TOP OF PHYSICAL MEMORY AND 
12412 ;* THE START OF THE TOP OF THE DIAGNOSTIC PROGRAM . 
12413 ;4 THIS MAY INVOLVE REMOVING PART OF THE DIAGNOSTIC RUNTIME SERVICES AND 
12414 34 THEN RESTORING. THE NUMBER OF BITS THAT HAVE BEEN SUCCESSFULLY TESTED 
12415 34 WILL BE PRINTED AT THE CONSOLE AT THE END OF THE TEST. 
12416 34 
12417 3* 
12418 j-- $OO66000000600 06 0006060006 00000606 0000 000000000000 0000 00000000000000000000 
12419 061552 BGNTST 
06155° T38:: 
12420 
12421 000046 TNUM == TNUM + 1 ; INCREMENT THE ASSEMBLY TIME TEST COUNTER 
12422 061552 012737 000046 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER 
12423 061560 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST 
12424 061566 012737 000001 005464 MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE 
12425 061574 012737 010461 005466 MOV 04401. ,ERRNBR ;SET ERROR NUMBER TO 4401 
12426 061602 012737 020333 005470 MOV @EM4401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN TABLE 
ord 061610 012737 024644 005472 MOV @EROSOS,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE 
12429 3° 
eee ; CLEAR THE SUCCESS FLAG TO INDICATE TEST FAILURE IN CASE IT DOES 
1 3° 
12432 
eas 061616 005037 063344 CLR sucss sINDICATE FAILURE , IN CASE THE DUT FAILS 
12435 
12436 i¢ 
peed ; SET UP THE 004 TRAP VECTOR TO CATCH ANY EXPECTED TRAPS THAT OCCUR 
12438 8° 
12439 
12440 061622 013737 000004 002422 MOV 904, TP4VEC sSAVE EXISTING 004 TRAP VECTOR 
ieee 061630 012737 041042 000004 MOV @TP4RTN, 804 +SET 004 TRAP VECTOR TO OUR SERVICE ROUTINE 
12443 i* 
12444 ; RESET THE DUT TO A KNOWN STATE,REMOVE THE STATUS CODES FROM THE FIFO. 
12445 ; CLEAR TX AND RX INTERUPT ENABLE BITS IN THE CSR 
12446 s- 
12447 
12448 061636 004737 030172 JSR PC .CLNRST sRESET THE DHV11-M , REPORT ANY ERRORS 
12449 061642 103402 Bcs .*6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
one 061644 000137 063306 JMP 60$ sEXIT THE TEST, FATAL ERROR WAS FOUND. 
12451 
12452 
12453 i? 
io ; DETERMINE WHETHER MEMORY MANAGEMENT IS PRESENT 
3° 
12456 
12457 061650 005737 002470 TST MMPRES ;IF MEM MGT IS PRESENT THEN 
12458 061654 001007 BNE is ;AVOID SETTING THE DMA TEST ADOR FOR 
12459 3A 16 BIT MACHINE. 
12460 061656 012737 001252 002432 MOV #1252,OMTSTA ;SET UP THE FIRST DMA TEST ADOR FOR 
12461 3A 16 BIT MACHINE 
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SEQ 0310 
HARDWARE TEST - DMAADR - 

12462 061664 012737 000021 063334 MOV #17. .BITSTD sSET THE BITS TESTED 10 16 + 1 
12463 061672 000513 BR 10$ sSINCE MEM MGT ISN'T PRESENT 
12464 ; THERE'S NO NEED TO DETERMINE WHETHER ITS 
12465 sA 22 OR AN 18 BIT MACHINE, SO BRANCH. 
12466 
12467 
12468 i¢ 
12469 ; DETERMINE WHETHER THE HOST IS AN 18 OR A 22 BIT MACHINE. THIS IS ACCOMPLISHED 
12470 ; BY TRYING TO READ A 22-BIT ADDRESS AND COMPARING THE READ DATA WITH THAT 
12471 ; FROM THE EQUIVALENT 18 BIT ADDRESS. 
12472 8° 
12473 
12474 i¢ 
este ; SET UP THE PARS 1 THROUGH S TO RELOCATE TO THE SAME ADDRESS 

g= 
12477 
12478 061674 012700 000200 1s: MOV #200 ,RO ;SEi THE PAGE BASE ADDRESS TO 200 $$$ 
ieee 061700 012701 002476 MOV @PARATB+2,R1 sPOINT AT THE START OF THE PAR ADORESS TABLE 3339 
12481 061704 010031 2s: MOV RO,@(R1)>+ sLOAD THE PAR 
12482 061706 062700 000200 ADO #200 ,RO sCALCULATE THE NEXT PAGE ADDRESS 
12483 061712 022701 002510 CMP @PARGA,R1 ;LOOP UNTIL PARS 0 THROUGH 5 $$$ 
12484 061716 001372 BNE 2s ;ARE LOADED. 
12485 
12486 
12487 :¢ 
eee ; SET UP THE PORS FOR , NO ABORT/TRAP,UPWARD EXPANSION,128 BLOCKS PER PAGE 

ge 
12490 
12491 061720 012700 077406 MOV #77406 ,RO sBIT PATTERN FOR THE PORS 
12492 061724 012701 002514 MOV @PDRATB,R1 sPOINT AT START OF POR ADDR TABLE 
12493 061730 010031 4$: MOV RO, @(R1)+ 3 
12494 061732 022701 002534 CMP @PORATE,R1 sLOOP UNTIL ALL PORS HAVE 
12495 061736 001374 BNE 4s sBEEN SET UP. 
12496 
12497 3° 
12498 ; SET THE MEM MGT STATUS REG #3 FOR, 22 BIT ADDRESSSING, 
12499 ; NO UNIBUS MAPPING, NO D SPACE 
12500 s- 
12501 ’ 
ioe] 061740 012777 000020 120520 MOV #20, SMMSR3 ;SET UP STATUS REG @3 
12504 se 3¢ 
12505 ; USE PAR @6 TO DETERMINE WHETHER THIS IS AN 18 OR A 22 BIT MACHINE BY SETTING 
12506 ; IT TO 100000. THIS WILL SELECT A 22 BIT ADDRESS ON A 22 BIT MACHINE, 
12507 ; ON AN 18 BIT MACHINE HOWEVER, THE MSBS WILL BE LOST AND THE MEMORY LOCATION 
12508 ; READ WILL BE THE EQUIVALENT is BIT ADORESS. 
12509 F PAR @6 IS USED BECAUSE WE CAN BE SURE THAT THE DIAGNOSTIC WILL NOT COME 
ee :; UNDER ITS INFLUENCE. 

ge 


e 
ores 061746 012777 100000 120532 MOV #100000, GPARSA ;LOAD THE PAGE ADOR INTO THE PAGE ADOR REG. $99 


, - 
aq ; ; SET UP THE LOOP TO ATTEMPT TO READ A 22 BIT ADOR 
ge 
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SEQ 0311 
HAROWARE TEST - DMAADR - 
12519 061754 012703 000005 MOV #5 ,R3 sINITIALISE LOOP COUNT 
12520 061760 012702 005260 MoV @SOPBAS ,R2 sSELECT THE VIRTUAL ADDRESS @SOPBAS, THIS WILL BE 
12521 sBITS O TO 12 OF THE PHYSICAL ADDRESS 
12522 061764 010204 MOV R2,R4 sSAVE THE DATA ADORESS 
12523 061766 062704 120000 ADO #120000, R4 sCONVERT THE VIRT. ADDR INTO AN ADOR WITHIN $99 
12524 sTHE INFLUENCE OF PAR #6. 
iH 061772 012737 000001 002426 MOV @68ITO, BITLNG sINDICATE A 22 BIT MACHINE IN CASE IT IS 
ead 062000 106427 000340 6$: MTPS @PRIO7 sDISABLE CLOCK INTERUPTS 
12529 062004 010400 MOV R4,RO sSET UP THE MOVE SOURCE 
12530 062006 012701 063340 MOV @OEST,R1 sSET UP THE DESTINATION 
12531 
12532 i¢ 
12533 + ENABLE THE MEM MGT AND ATTEMPT TO READ THE 22 BIT ADDRESS. IF A TRAP OCCURS 
12534 + THEN THE HOST MUST BE A 22 BIT MACHINE SINCE WE HAVE ENSURED THAT 
isaee s THE 18 BIT ADDRESS EXISTS. 













12538 062012 012777 000001 120444 MOV @8ITO, GMMSRO sENABLE MEM MGT 

12539 062020 004737 030112 JSR PC .CKTRAP sPERFORM THE MOVE AND CHECK FOR A TRAP 
ie 062024 005077 120434 CLR GMMSRO sDISABLE MEM MGT 

et | 062030 106427 000240 MTPS @PRIOS sENABLE CLOCK INTERUPTS 









12544 062034 005737 002424 TST TP4FLG sDID A TRAP OCCUR ? 
ienek 062040 001022 BNE 8$ sYES , THEN JUMP AND INDICATE A 22 BIT MACHINE 











3¢ 
12548 + SINCE A TRAP HASN'T OCCURED THEN EITHER THE MACHINE IS A 22 BIT MACHINE WITH 
12549 s MEMORY AT THE ADDRESS JUST READ , OR , ITS AN 18 BIT MACHINE IN WHICH CASE 
rast + THE ADDRESS JUST READ WOULD BE ONE OF THE DATA WORDS AT ADORESS @SDPBAS. 

ge 
12552 
12553 062042 023712 063340 CMP DEST ,CR2) sCOMPARE READ WORD WITH DATA WORD 
12554 062046 001017 BNE 6s sIF NOT THE SAME THEN JUMP AND INDICATE A 






12555 s 22 BIT MACHINE. 








’ 

+ IN ORDER TO MAKE SURE THAT THIS REALLY ISN'T A 22 BIT MACHINE I.E. THAT 
12559 i THE MATCH OF THE READ WORD AND THE DATA WORD WAS NOT MERELY COINCIDENCE, 
eat + ANOTHER FOUR ADDRESSES ARE READ AND COMPARED WITH THE DATA. 

i* 










12562 
12563 062050 062702 000002 A00 @2 ,.R2 sSELECT NEXT TEST DATA ADORESS 
12564 ADO @2 ,.R4 







dE 
12566 062062 001546 BNE 69 sREPEAT THE READ ATTEMPTS UNTILL ALi FIVE DATA 
12567 sWORDS HAVE BEEN SUCCESSFULLY MATCHED, AND THEN 
oe 062064 005037 002426 CLR BITLNG sINDICATE AN 18 BIT MACHINE. 
12570 s* 
asare s SET UP THE HIGHEST POSSIBLE TEST ADORESS IN OMTSTA 
ge 









12574 062070 012737 005252 0024632 "OV 05252, OMTSTA sSET UP THE FIRST OMA TEST ADORESS FOR THE 
12575 s 18 GIT MACHINE. 





NS | eR SE 
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SEQ 0312 
HARDWARE TEST - DMAAOR - 

12576 062076 012737 000023 063334 MOV #19. ,BITSTOD sSET THE BITS TESTED TO 18 BITS + 1. 

12577 062104 000406 BR 10$ sAVOID SETTING DMTSTA FOR THE 22 BIT MACHINE 

12578 062106 012737 125252 002432 83: MOV #125252,DMTSTA ;SET UP THE FIRST PAGE ADOR FOR 

12579 sA 22 BIT MACHINE. 

rise 062114 012737 000027 063334 MOV #23. ,BITSTD sSET THE BITS TESTED TO 22 BITS «1. 

12582 3° 

12583 ; TRY AND FIND A COMPLEMENTARY PAIR OF ADDRESSES WITHIN THE MEMORY AND SAVE 

12584 : THE CONTENTS OF THE TWO AREAS. THE TEST IS ABANDONED IF A COMPLEMENTARY 

12585 ; PAIR HAS NOT BEEN FOUND BEFORE THE AREA OF MEMORY CONTAINING THE 

12586 s DIAGNOSTIC IS ENCOUNTERED. 

12587 3- 

12588 

12589 062122 012737 041020 000004 103: MOV @TP4BRT, 904 sCHANGE THE 004 TRAP VECTOR TO POINT TO 

12590 sTP4BRT SINCE THIS IS THE ROUTINE ASSOCIATED 

cooee sWITH THE BYTE SUBROUTINE CKTRPB. 

12593 062130 MEMORY FFREM sGET THE ADDRESS OF THE FIRST FREE WORD 
062130 104431 TRAP C$MEM 
062132 010037 002430 MOV RO,FFREM 

earns 3;0F MEMORY ABOVE THE DIAGNOSTIC. 

12596 062136 012701 004012 MOV @BUFBAS,R1 sPOINT AT THE BUFFER WHERE THE CONTENTS OF 

12597 sTHE MEMORY BEING READ ARE TO BE SAVED. 

12598 062142 005004 CLR R4 sCLEAR THE COMPLEMENTARY PAIR INDICATOR (CPI) 

teed 062144 106427 000340 MTPS @PRIO7 sDISABLE LTC INTERRUPTS 

1 

12601 062150 005204 12$: INC R4 sINCREMENT THE CPI 

12602 062152 005005 CLR RS sINDICATE THAT A SAVE OF THE DATA AT 

12603 sCDMTSTA) IS REQUIRED. 

12604 062154 012703 000020 MOV #16. .R3 ;SET THE NUMBER OF BYTES TO BE READ 

12605 062160 004737 030502 JSR PC .OMRW :SAVE THE DATA CONTAINED AT ADDRESS DMTSTA. 

12606 062164 012701 004412 MOV OBUFMID,R1 sPOINT AT SECOND STORAGE AREA 

12607 062170 005737 002424 TST TP4FLG sIF WE HAVE VALID MEMORY THEN AVOID CLEARING 

eee 062174 001403 BEQ 14$ ;THE CPI AND RESETING THE SAVE AREA ADOR 

12610 062176 005004 CLR R4 ;CLEAR THE CPI. 

12611 062200 012701 004012 MOV OBUFBAS,R1 sRESET THE ADDR FOR THE SAVED DATA STORE 

12612 062204 022704 000002 14$: CMP $2 ,R4 IF A PAIR OF COMPLEMENTARY ADORESSSES HAVE 

12613 ;BEEN FOUND THEN 

12614 062210 001447 BEQ 17$ :GO AND WRITE THE TEST DATA TO THESE ADORS. 

12615 062212 013737 002432 063542 MOV DMTSTA,ODTSTA ;SAVE THE OLD DMTSTA 

12616 062220 000241 cLc ;CLEAR CARRY READY FOR THE ROTATION 

12617 062222 006037 002432 ROR OMTSTA sCOMPLEMENT THE DMTSTA TO PRODUCE THE NEXT 

12618 ; DMA TEST ADOR. 

12619 062226 005337 063334 DEC BITSTD ;DECREMENT THE NUMBER OF BITS TESTED COUNT 

12620 

12621 3° 

12622 ; CHECK THAT THE NEW DMTSTA IS NOT INSIDE THE DIAGNOSTIC PROGRAM 

et , 

freee 062232 032737 176000 002432 BIT #176000, DMTSTA og a ee > 1252 , IF IT IS THEN WE'RE 

6 ; ° 

12627 062240 001343 BNE 12$ s;BRANCH AND CONTINUE WITH THE SEARCH 

12628 062242 004737 030430 JSR PC ,0M168 sCONVERT THE DMTSTA TO A PHYSICAL ADOR. 

12629 062246 020037 002430 CMP RO,FFREM sARE WE INSIDE THE DIAGNOSTIC REGION ? 

12630 062252 103336 BHIS 12$ sNO , THEN BRANCH AND CONTINUE WITH THE SEARCH 

t ee RR RT A RR A SSE 
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SEQ 0313 

HARDWARE TEST - DMAADR - 

12631 

12632 s¢ 

12633 sSINCE WE ARE NOW INSIDE THE DIAGNOSTIC, WE INCREMENT BIT #14 OF THE DMTSTA 

12634 sPHYSICAL ADORESSS AND IF WE'RE STILL INSIDE THE DIAGNOSTIC WE ABANDON THE 

pete sTEST. ONCE WE ARE IN THIS REGION WE ARE ONLY ABLE TO TEST THE LOWEST 14 BITS. 

1 ' 

12637 

12656 

12639 062254 022737 000252 002432 CMP @252,0MTSTA ;IF THE BIT HAS ALREADY BEEN SET THEN 

12640 062262 001014 BNE 1538 sABANDON THE TEST, AFTER REPORTING THE ERROR , 

12641 ; BECAUSE NO SUITABLE MEMORY HAS BEEN FOUND. 

12642 062264 012737 000652 002432 MOV #652 ,.DMTSTA ;SET THE BIT 

12643 062272 062700 040000 ADD #40000 ,RO ;AD0 THE BIT INTO THE PHYSICAL ADDR 

12644 062276 020037 002430 CMP RO,FFREM IF WE'RE NOW STILL INSIDE THE DIAGNOSTIC THEN 

12645 062302 103404 BLO iss sREPORT ERROR AND ABANDON THE TEST. 

12646 062304 012737 000016 063334 MOV #14. ,BITSTD sOTHERWISE SET THE BITS TESTED TO 14 BITS. 

12647 062312 000716 BR 12$ sCONTINUE WITH THE SEARCH. 

12648 

12649 

12650 062314 005237 005466 158: INC ERRNBR ;SET THE ERROR NUMBER TO 4402 

12651 062320 012701 020355 MOV @EM4402,R1 sSELECT MESSAGE TO BE REPORTED. 

12652 ; “ NO SUITABLE ADDR FOUND. DMA TEST ABORTED ” 

12653 

12654 

— 062324 000137 063304 168: JMP 34$ ;JUMP TO THE ERROR. 

12657 

12658 3° 

12659 ; WRITE THE TEST DATA INTO [HE TWO AREAS JUST FOUND. IF A TRAP OCCURS WHILE 

sory ; WE ARE WRITING DATA INTO THESE AREAS THEN THE HOST MACHINE IS AT FAULT. 

12: 3? 

12662 

12663 062330 012700 005260 17$: MOV @SDPBAS,RO ;SET UP THE SOURCE ADDR FOR THE MOVE AS OUR 

12664 ;TEST DATA PATTERN. 

12665 062334 013737 002432 063336 MOV OMTSTA,DUMY sSAVE THE LOWER DMTSTA 

12666 062342 013737 063342 002432 MOV ODTSTA,OMTSTA sSTART WITH THE HIGHER OF THE TWO 

12667 ; COMPLEMENTARY ADDRESSES. 

12668 062350 012703 000020 MOV #16. ,.R3 ;SET THE NUMBER OF DATA BYTES TO BE WRITTEN 

at 062354 012705 000001 MOV #1,R5 sINDICATE TO WRITE TO DMTSTA 

6 

12671 

12672 062360 012701 000340 MOV $340,R1 ;SET PRIORITY 7 TO DISABLE THE CLOCK 

ot 062364 004737 036016 JSR PC ,STPSW ; 

126 

12675 062370 005237 005466 INC ERRNBR ;SET THE ERROR NUMBER TO 4403 

12676 062374 012701 020423 MOV 9€M4403,R1 ;SELECT THE MESSAGE, 

12677 ; “HOST FAILURE. WRITE FAILED TO AN ADDR WHICH 

eth sHAD BEEN SUCCESSFULLY READ, TEST ABANDONED ” 

12680 062400 004737 030502 JSR PC ,OMRW ;PERFORM THE TRANSFER 

22681 062404 005737 002424 TST TP4FLG sEXIT IF HOST FAILURE 

12682 062410 001345 BNE 16% ;AND REPORT ERROR. 

12683 062412 013737 063336 002432 MOV DUMY ,OMTSTA ;SELECT THE LOWER DMA TEST ADOR. 

12684 062420 012700 005304 MOV @SDP 2B ,RO ;SELECT THE NEXT DATA PATTERN 

12685 062424 004737 030502 JSR PC ,OMRW ;PERFORM THE TRANSFER 

12686 062430 005737 002424 TST TP4FLG sEXIT IF HOST FAILURE 

12687 062434 001333 BNE 16% 3 














HARDWARE TEST 


12688 
12689 
12690 
12691 
12692 
12693 
12694 
12695 
12696 
12697 
12698 
12699 
12700 
12701 
12702 
12703 
12704 
12705 
12706 
12707 
12708 
12709 
12710 
12711 
12712 
12713 
12714 
12715 
12716 
12717 
12718 
12719 
12720 
12721 
12722 
12723 
12724 
12725 
12726 
12727 
12728 
12729 
12730 
12731 
12732 
12733 
12734 
12735 
12736 
12737 
12738 
12739 
12740 
12741 
12742 
12743 
12744 


| 
= 





005237 


004737 


010102 
012701 


103402 
000137 
010201 


012700 
004737 
012700 
004737 
004737 


013705 
012704 
010137 
012737 


013777 
012737 








- DMAADR - 


005466 


030772 


020520 


063106 


000204 
040250 
177670 
040324 
036446 


063342 
005260 
063332 
000002 


000052 
000006 


063330 


000100 
000025 
000200 
063332 117476 
010465 005466 


es RS cS Se 
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3° 
; SET UP THE DHV11-M TO PERFORM THE DMA. 


3? 

+ SET INTERNAL LOOPBACK, ENABLE THE RECIEVER FUNCTION ON THE LINE. 

; SET THE LPR ON THE LINE TO 38.4K BAUD, 8 BITS PER CHARACTER, ODD PARITY, 
; 2 STOP BITS. ENABLE THE TRANSMITTER ON THE LINE. 


,* 
INC 


JSR 


MOV 
MOV 


BCS 
JMP 
MOV 


3? 
; AN ACTIVE LINE HAS BEEN FOUND 


MOV 
MOV 


228: ADD 


ERRNBR 


PC,.FINACT 


R1,R2 
0EM4404,R1 


#204 ,RO 

PC ,WTWLNC 

#177670,R0 
PC ,WTWLPR 

PC, TXENBL 


3° 
; INITIATE THE DMA 


ODTSTA,RS 
@SDPBAS ,R4 
R1,80$ 
2,708 


80$,@CSRA 


04405. ,ERRNBR 


sSET THE ERRNBR TO 4404 


f= yh AN ACTIVE LINE ON WHICH TO PERFORM 
; . 
sSAVE THE LINE NUMBER ON WHICH THE DMA WILL OCCUR 


sSELECT THE MESSAGE, 
s_ "NO ACTIVE LINES , TEST ABANDONED” 


sEXIT IF A LINE COULD NOT BE FOUND ,AFTER FIRST 


sRESTORING THE CONTENTS OF MEMORY. 
sRESTORE THE ACTIVE LINE NUMBER. 


sPASS THE LNCTRL CONTENTS 
sINITIALISE THE LNCTRL REGISTER 
sPASS THE LPR CONTENTS 
sINITIALISE THE LPR REGISTER 
sENABLE TRANSMITTER ON THE LINE 


sSTART FROM THE HIGHER OF THE PAIR OF ADDR. 
sSET UP THE ADDR OF THE DATA PATTERN 

sSAVE THE LINE NUMBER FOR THE DMA 
sINITIALISE THE LOOP COUNT 


SET UP THE LSB’S 

;sCLEAR THE REG THAT WILL HOLD THE 6 MSB‘S 
sCONVERT THE DMTSTA INTO 

3A PHYSICAL ADDRESS WITH 

;THE MSB‘S IN REG @3. 

; 


; 

sTEST BIT @6 OF THE DMTSTA 

; 

sALTER THE LSB‘S IF BIT #6 WAS SET. 


ADD IN THE LSB’‘S 
sSET BIT @7. 


sSELECT THE LINE ON WHICH TO PERFORM THE DMA. 


sSET ERROR NUMBER 4405 
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HARDWARE TEST 


12745 062610 
12746 
12747 
12748 062614 


012701 


105777 
100532 


012777 
010577 
110377 


012701 
013702 


005237 


004737 
012701 


103110 


010402 
012704 
004737 
010204 


005003 
012705 


012737 
012701 


017702 
100067 


012700 
040200 
001011 
004737 


005237 
012701 


005305 
001453 





020557 


117474 


000020 
117456 
117454 


170144 
002300 


005466 


037740 
020653 


000005 
030370 


000200 


010467 
020727 


117354 


170301 


035624 


005466 
021011 





- DMAADR - 
MOV 
TSTB 
BMI 
MOV 


MOV 
MOVB 


117466 


@€M4405,R1 
8TXAD2A 
30% 


#16. ,QTXBFCA 
RS,@TXAD1IA 
R3,8TXAD2A 


sSELECT THE MESSAGE, 

;_" DMA_START BIT FOUND SET BEFORE OMA INIT. 
sTEST ABANDONED” 

sTEST THE DUT DMA-START BIT 

sEXIT WITH ERROR IF SET ,AFTER FIRST RESTORING 
sTHE CONTENTS OF MEMORY. 

SET UP CHARACTER COUNT 

sSET UP BITS O TO 15 OF THE PHYISCAL ADOR. 
sSET UP BITS 16 TP 21 , AND INITIATE THE DMA. 


3° 
; WAIT FOR THE DMA TO COMPLETE AND THE LAST CHARACTER TO BE RECIEVED 


MOV 
MOV 


INC 
JSR 
MOV 


BCC 


#170144,R1 
CSRA ,R2 


ERRNBR 


PC ,WAIBIS 
0€M4406,R1 


sTEST BIT 15, TIME-OUT OF 100 MS. 
sPASS THE ADOR OF THE REG TO TEST. 


sSET ERROR NUMBER TO 4406 


sWAIT FOR BIT TO SET 

sSELECT THE MESSAGE , 

;_" TIME-OUT OCCURED WAITING FOR DMA TO 
sCOMPLETE. TEST ABANDONED” 

sEXIT IF TIME-OUT OCCCURED, AFTER FIRST , 
sRESTORING THE CONTENTS OF MEMORY. 

sSAVE R4 

;SET 5 MS DELAY 

;DELAY TO ALLOW LAST CHARACTER TO BE RECIEVED 
sRESTORE R4 


3° 
; READ THE CONTENTS OF THE RXFIFO AND COMPARE THEM WITH THE CORRECT DATA 


CLR 
MOV 


MOV 
MOV 


005466 243: 





R3 
#128.,R5 


$4407. ,ERRNBR 
9€M4407,R1 


ORBUFA ,R2 
30% 


#170301,R0 
R2,R0 

28% 

PC .SAVBMP 


ERRNBR 
9€M4408,R1 


RS 
30% 


s;CLEAR THE READ DATA COUNTER 
sSET THE MAX BMP CODE READ COUNT 


;SET THE ERRNBR TO 4407 

sSELECT THE MESSAGE , 

;_“ RXFIFO EMPTY TOO SOON, DMA FAILED 
TEST ABANDONED” 


sREAD THE CHARACTER FROM THE FIFO 

sBRANCH TO REPORT ERROR IF FIFO EMPTY TOO SOON, 
sAFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
sSET UP BIT MASK OF A BMP CODE 

sTRY TO CLEAR THE BMP CODE MASK 

sBRANCH IF NOT A BMP CODE 

sSAVE THE BMP CODE ON THE QUEUE 


sSET THE ERRNBR TO 4408 

sSELECT THE MESSAGE, 

;_" TOO MANY BMP CODES FOUND IN THE RXFIFO, 
sTEST ABANDONED” 


sDEC THE MAX BMP CODE READ COUNT 
sGO REPORT ERROR IF TOO MANY BMP CODES FOUND , 


SEQ 0315 
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SEQ 0316 
HARDWARE TEST - DMAADR - 
12802 sAFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
poet 062760 000753 BR 243 sD0N'T COUNT THE BMP CODE AS A VALID CHARACTER 
12805 
12806 062762 012737 010471 005466 283: MOV 04409.,ERRNBR ;SET THE ERRNBR TO 4409 
12807 062770 010201 MOV R2,R1 sSAVE THE CHARACTER FROM THE FIFO 
12808 062772 012702 021054 ’ MOV 0EM4409,R2 sSELECT THE MESSAGE , 
12809 ; " BAD BIT BETWEEN BITS 0 AND ” 
12810 062776 012737 026440 005472 MOV @ER9101,ERRBLK ;SELECT THE ERROR ROUTINE. 
iaeak 063004 012737 177777 063344 MOV #-1,SUCSS sINDICATE ‘BAD BITS’ FAILURE 
1 
12813 063012 122401 CMPB = (R4)+,R1 sCOMPARE CHAR FROM FIFO WITH THE CORRECT DATA. 
12814 063014 001034 BNE 30$ sBRANCH IF INCORRECT AND RESTORE MEM CONT’S. 
12815 063016 005037 063344 CLR sucSS sINDICATE NON TEST SPECIFIC FAILURE E.G. TIME-OUTS 
12816 063022 005203 INC R3 sCOUNT THIS CHARACTER. 
12817 063024 022703 000020 CMP 16. ,R3 sHAVE WE RECIEVED ALL THE CHARACTERS ? 
12818 063030 001327 BNE 243 sLOOP UNTIL ALL CHARACTERS (NON-BMP) ARE READ. 
12819 063032 005337 063330 DEC 70$ sDECREMENT THE LOOP COUNT 
12820 063036 001420 BEQ 29$ sBRANCH IF BOTH OMA'S ARE COMPLETED 
12821 063040 012704 005304 MOV @SOP2B ,R4 sSET UP THE SECOND DATA PATTERN 
rts 063044 013705 002432 MOV DMTSTA,RS sSET UP THE OTHER OMA TEST ADDRESS 
12824 063050 012737 010472 005466 MOV 4410.,ERRNBR ;SET ERRNBR TO 4410 
12825 063056 012701 021111 MOV 9€M4410,R1 sSELECT THE MESSAGE , 
12826 s_“ RXFIFO FAILED TO PURGE, TEST ABANDONED ” 
pod 063062 012737 024644 005472 MOV @EROSO3,ERRBLK ;SELECT THE ERROR ROUTINE 
1 
12829 063070 004737 032722 JSR PC ,PUFIFO sPURGE THE RXFIFO 
12830 063074 103004 BCC 30$ sEXIT WITH ERROR IF FIFO WOULD NOT PURGE , 
12831 sAFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
ee} 063076 000615 BR 18$ sOTHERWISE REPEAT. 
12834 063100 012737 000001 063344 293: MOV #1,SUCSS sINDICATE THAT WE HAVE BEEN ABLE TO TEST, 
12835 sSOME OF THE BITS. 
12836 
12837 
12838 i* 
12839 s RESTORE THE ORIGINAL DATA IN THE MEMORY 
i2eei 7 
12842 063106 013737 002432 063336 30%: MOV OMTSTA,DUMY sSTART WITH THE HIGHER OF THE PAIR OF DMTSTA 
12843 063114 013737 063342 002432 MOV ODTSTA,DMTSTA ; 
12844 063122 012700 004012 MOV @BUF BAS ,RO sPOINT AT THE START OF THE SAVED DATA AREA 
12845 063126 012705 000001 MOV #1,R5 sSELECT WRITE TO (DMTSTA) 
12846 063132 012703 000020 MOV #16. ,R3 sPASS NUMBER OF BYTES TO BE WRITTEN 
12847 063136 004737 030502 JSR PC ,OMRW sRESTORE THE DATA 
12848 063142 005737 002424 TST TP4FLG sGO REPORT ERROR IF A TRAP OCCURED 
12849 063146 001012 BNE 31$ i 
212850 063150 013737 063336 002432 MOV DUMY ,OMTSTA sNOW RESTORE THE DATA FROM THE LOWER 
12851 ;OF THE PAIR OF TEST ADDRESSES. 
12852 063156 012700 004412 MOV @BUFMID . RO sPOINT AT THE START OF THE SAVED DATA AREA 
a 063162 004737 030502 JSR PC ,OMRW sRESTORE THE DATA 
12855 063166 005737 002424 TST TP4FLG sGO REPORT ANY ERRORS IF A NO TRAP 
—s 063172 001411 BEQ 32$ ; OCCURED DURING THE RESTORE. 
12858 063174 012737 010473 005466 31%: MOV 4411.,ERRNBR ;SET THE ERROR NUMBER TO 4411 
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SEQ 0317 
HARDWARE TEST - DMAADR - 

12859 063202 012701 021140 MOV 0€M4411,R1 sSELECT THE MESSAGE , 

12860 s “ HOST FAILURE. WRITE FAILURE TO AN ADOR 

12861 sWHICH HAD PREVIOUSLY BEEN SUCCESSFULLY 

12862 sWRITTEN TO. ” 

12863 063206 012737 024644 005472 MOV @EROSOS,ERRBLK ;SELECT THE ERROR ROUTINE 

12864 063214 000433 BR 34$ sREPORT THE ERROR 

12865 

12866 i¢ 

12867 ; HAS THE TEST BEEN SUCCESSFUL, PRINT THE BITS TESTED IF IT HAS, 

12868 ; REPORT THE ERRORS OTHERWISE. 

12869 ia 

12870 

12871 

12872 063216 005737 063344 32$: TST SUCSS sIF THE ERROR IS NON TEST SPECIFIC THEN 

12873 063222 001430 BEQ 34$ sBRANCH TO REPORT ERRORS 

12874 063224 013701 063334 MOV BITSTD,R1 sLOAD THE NUMBER OF BITS TESTED 

12875 063230 005301 DEC R1 sDEC TO GIVE THE BIT POSITION OF THE MSB TESTED. 

12876 063232 022737 000001 063344 CMP #1,SUCSS sIF THE BITS TESTED ARE BAD THEN 

ooh 063240 001021 BNE 34$ sBRANCH AND REPORT ERRORS. 

12879 Hid 

poses ; OTHERWISE DETERMINE IF PRINTING OF THE SUCCESSFULLY TESTED BITS WAS REQUESTED. 

1 ie 

12883 

12884 063242 032737 000040 002262 BIT #68 ITOS ,OPTION ; PRINT THE BITS TESTED IF THE SOFTWARE 

12885 063250 001416 BEQ 60$ s;OPTION HAS REQUESTED IT 

12886 063252 010102 MOV R1,R2 sCALCULATE THE NUMBER OF BITS WHICH HAVE 

12887 063254 005202 INC R2 ; BEEN TESTED SUCCESSFULLY. 

12888 063256 PRINTB #€F4401,R1,R2 sPRINT THE NUMBER OF BITS TESTED MESSSAGE. 
063256 010246 MOV R2,-(SP) 
063260 010146 MOV R1,-(SP) 
063262 012746 006412 MOV #€F 4401, -(SP) 
063266 012746 000003 MOV #3,-(SP) 
063272 010600 MOV SP ,RO 
063274 104414 TRAP C$PNTB 
063276 062706 000010 ADD #10,SP 

12889 063302 000401 BR 60$ sEXIT THE TEST 

12890 

12891 

12892 063304 34$: ERROR ; REPORT ERRORS 
063304 104460 TRAP CSERROR 

12893 

12894 

12895 063306 106427 000240 60$: MTPS @PRIOS sENABLE THE CLOCK 

12896 063312 013737 002422 000004 MOV TP4VEC ,804 sRESTORE THE NORMAL 004 TRAP VECTOR 

iooen 063320 005037 002362 CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST 

1 8 

12899 063324 EXIT TST 
063324 104432 TRAP CSEXIT 
063326 000020 -WORD 110101-. 

12900 

wh 4 ee » & i* 

12903 5 Sheeeeeeeeseeeeceaeeese LOCAL VARIBLE AREA 4400460006404460404400040400664 

12904 5° 

12905 
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HAROWARE TEST 


12906 063330 

12907 063332 

12908 063334 

12909 063336 

12910 063340 

12911 

12912 063342 

12913 063344 

12914 

12915 

12916 

12917 

12918 

12919 

12920 

12921 

12922 

12923 063346 
063346 
063346 

12924 





194401 


- DMAADR - 


3¢ 


- WORD 
. WORD 
: .WORD 
. WORD 
- WORD 


: .WORD 
. WORD 
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oo ooooco 


0 - OTHER ERRORS 





sCOUNTER FO" THE NUMBER OF DMA’S COMPLETED 
sSAVE AREA FOR THE ACTIVE LINE NUMBER 
sNUMBER OF BITS TESTED 
sDUMMY VARIABLE 

sSAVE AREA FOR READ WORD , WHEN DETERMINING 
sMACHINE ADDRESS LENGTH. 
sHIGHER OF THE PAIR OF COMPLEMENTARY ADOR. 
sSUCCESS INDICATOR, -1 - ERROR DUE TO BAD BITS 
1 - SUCCESSFUL TEST 


§2464040404444644644444444444444% END SEREAARAERERAEEEEREARERERERESERERALER EEL 


ENDTST 





L10101: 





TRAP 


CSETST 
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HARDWARE TEST 


12926 
12927 
12928 
12929 
12930 
12931 
12932 
12933 
12934 
12935 
12936 
12937 


12938 
12939 
12940 
12941 
12942 
12943 
12944 
12945 
12946 
12947 
12948 
12949 
12950 
12951 
12952 
12953 
12954 
12955 
12956 
12957 
12958 
12959 


12960 





000047 
012737 
012737 
012737 
012737 
012737 
005037 


004737 
103402 
000137 
012737 


106427 


012746 
012746 
013746 
012746 
104437 
062706 


012746 
012746 
013746 
012746 
104437 
062706 
106427 


012700 
004737 


- SHTSNG - 


000047 
177777 
000001 
021451 
022321 
002650 


030172 


063704 
021452 


003452 
030214 


002364 
002362 
005464 
005466 
005470 


005466 











SEQ 0319 
-SBTTL HARDWARE TEST - SHTSNG - 
PERMIT TIO IIIT titi tir itit titi ti titti ttt ti tit TT TT TTT TT TTT TTTTTTTTi TTT TTT TTT 
3% - Short Single Character Mode Test - 
3% This test verifies that the Device Under Test (DUT) will perform 
3% transmission and reception correctly using the ay ag is ge 
3% mode interrupts. This test is is performed at 38.4K baud, 1 stop 
3% bit, odd parity, 8 bits per character. A single 256 char data pattern 
3% is sent to each active line. 


F-— SRSREAEAAAEERAASEKAKAEEAESEREEAAEASRARESEREAEASESEREEAAEESEEERKERAREREE REDE 


BGNTST — 

TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (90) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #9001.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @#EM9001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 


i¢ 

; Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR 

; This subroutine reports error >>>>> 9001 <<<<<, 


;° 
JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS -+6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
JMP 60$ sEXIT THE TEST, FATAL ERROR WAS FOUND. 
MOV #9002.,ERRNBR ;SET THE ERROR NUMBER. 


3? 
; Set up for Transmit and Receive interrupts. 


g° 
MTPS @PRIOS ;DISABLE DEVICE INTERRUPTS. 
SETVEC TXVECA,@TXSCHR,@PRIOS ;SELECT SINGLE CHAR TX INT SERVICE RTN. 


MOV @PRIOS, -(SP) 
MOV @TXSCHR, -( SP) 
MOV TXVECA, -(SP) 
MOV @3,-CSP) 
TRAP C$SVEC 
ADO #10, SP 

SETVEC RXVECA,@RXCHRS,@PRIOS ;SELECT RX INT SERVICE RIN. 
MOV @PRIOS , -( SP) 
MOV @RXCHRS , -( SP) 
MOV RXVECA, -(SP) 
TRAP C$SVEC 
ADD #10,SP 


MTPS @PRIOO ;ALLOW INTERRUPTS. 
i* 
; Clear the error counter table. 


; This table will eaccumulete error count totels for each line during this test. 


f MOV —«@ERCNTB, RO 


JSR PC, ,CLR16W sCLEAR THE RX ERROR COUNTERS TABLE. 


3¢ 
; Transmit and receive 256 byte data patterns. 
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SEQ 0320 
HARDWARE TEST - SHTSNG - 

12970 3° 
12971 y+ 
pte ; Initialize the long date pattern and parameters for the SCHTST call. 
1 g° 
12974 063526 012737 021465 005466 MOV $9013. ,ERRNBR ;SET THE ERROR NUMBER TO 9013. 
12975 063534 012702 004012 4$: MOV OBUFBAS,R2 sINITIALIZE THE LONG DATA 
12976 063540 005003 CLR R3 ; PATTERN IN THE GENERAL 
12977 063542 110322 6$: MOVB R3,(R2)+ ; DATA BUFFER TO A 256 
12978 063544 005203 INC R3 ; BYTE PATTERN COUNTING 
12979 063546 020227 004412 CMP R2, @BUFMID ; FROM ZERO TO 255. 
12980 063552 103773 BLO 6$ ; 
12981 3¢ 
hee | ; Initialize for, and get the LPR contents. 
1 a° 
12984 063554 005037 002634 CLR GPRSOB ;CLEAR THE GPR SAVE AREA Ri STORAGE TO INDICATE 
12985 ; THAT THIS IS THE FIRST TIME IN GETLP2. 
12986 063560 004737 036036 8$: JSR PC , SWAPO s;SWAP GPRS WITH GPR SAVE AREA ZERO FOR GETLP1. 
12987 063564 004737 031134 JSR PC ,GETLP2 sGET NEXT SET OF LPR CONTENTS, OR CARRY CLEAR. 
12988 063570 004737 036036 JSR PC ,SWAPO ;SWAP BACK GPRS AND GPR SAVE AREA ZERO. 
12989 063574 103036 BCC 10$ sEXIT LOOP IF ALL COMBINATIONS OF LPRS DONE. 
12990 063576 010001 MOV RO,R1 sPASS THE LPR CONTENTS TO GETTIM AND VANSUP. 
12991 063600 004737 031264 JSR PC ,GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
12992 063604 012702 004012 MOV @BUFBAS,R2 ;SET UP POINTER TO START OF SHORT DATA PATTERN. 
12993 063610 012703 000400 MOV @BUFMID-BUFBAS,R3 ;SET UP THE DATA PATTRN LENGTH. 
12994 063614 012704 000001 MOV $1,R4 sSPECIFY TO SEND 1 DATA PATTERN TO EACH LINE. 
12995 063620 004737 037466 JSR PC, VANSUP ;SET UP “VANILLA FLAVORED” TX/RX. 
12996 063624 004737 027530 JSR PC ,CHRMSK ;GET THE BIT MASK OF UNUSED TX/RX BITS. 
12997 063630 004737 032722 JSR PC ,PUFIFO ;PURGE THE DUT RECEIVE CHARACTER FIFO. 
12998 063634 004737 033176 JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 
12999 063640 004737 031442 JSR PC, INICHR ;SEND INITIAL CHARS TO ALL ACTIVE LINES. 
tee 063644 012737 021465 005466 MOV #9013. ,ERRNBR ;SET THE ERROR NUMBER TO 9013. 
13001 i¢ 
ote ; The following routine reports the error with numbers 9013 thru 9018. 
1 i- 
13004 063652 004737 033232 JSR PC ,ROCHRS sREAD AND VERIFY THE RX CHARACTERS. 
yaeey 063656 012737 021473 005466 MOV #9019. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 9019. 
1 i* 
ood ; The following routine reports the error with numbers 9019 thru 9022. 
1 3° 
13009 063664 004737 037154 JSR PC , TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
13010 i¢ 
ott ; Loop to select the next baudrate and line parameters. 
1301 i> 
pote 063670 000733 BR 8$ 
1301 
13015 063672 012737 021477 005466 10%: MOV #9023. ,ERRNBR ;SELECT NUMBER 9023 FOR THE NEXT ERROR REPORT. 
oe 063700 004737 034502 JSR PC ,REPSMR sREPORT ERROR SUMMARIES IF CALLED FOR. 
1301 
13018 :° 
13019 ; All done, have completed the test. 
13020 ’ Disable interrupts. 
pot ; Clear the interrupt vectors. 
1302 3° 
13023 063704 106427 000240 60$: MTPS OPRIOS ;DISABLE DEVICE INTERRUPTS. 
13024 063710 CLRVEC TXVECA ;RETURN TX INT VECTOR TO UNUSED POOL. 

063710 013700 002270 MOV TXVECA,RO 

063714 104436 TRAP Cscvec 
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SEQ 0321 
HARDWARE TEST - SHTSNG - 





13025 063716 CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 
063716 013700 002266 MOV RXVECA,RO 
063722 104436 TRAP CsCvec 
tof 063724 005037 002362 CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
1 
13028 063730 ENDTST 
063730 L10102: 
063730 104401 TRAP CSETST 


r-— 
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SEQ 0322 
HARDWARE TEST - SHTOMA - 

13030 .SBTTL HARDWARE TEST - SHTOMA - 

13031 $O¢ S200 08 660666660666 6064666 6664600660666 6666606666666 6064666606666 666666666066466668 

13032 38 - Short DMA Mode Test - 

13033 34 This test verifies that the Device Under Test (DUT) will perform 

13034 ;* transmission and reception correctly using the DMA mode trensmission. 

13035 ;@ This test is performed et 9.6K baud, 5 bits per cherecter, 2 stop bits 

13036 34 end even parity. A single 512 byte dete pettern is transmitted and 

13037 ;* received to/from each active line. 

13038 i* 

13039 Fo 8880 0064666606606 066006066066 66660666666 666066066046 66606606606 6606660060666 464646606646 06068 

13040 063732 BGNTST 
063732 T40:: 

13041 000050 TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

13042 063732 012737 000050 002364 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER (91) 

13043 063740 012737 177777 002362 MOV @-1,CTRLCF ;INDICATE THAT WE ARE IN A TEST. 

13044 063746 012737 000001 005464 MOV #1, ,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 

13045 063754 012737 021615 005466 MOV #9101. ,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

13046 063762 012737 023647 005470 MOV @EM9101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 

foes 063770 005037 002650 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 

1 i? 

13049 ; Reset the DUT to a known state, remove the stetus codes from the fifo. 

13050 ; Cleer TX and RX interrupt eneble bits in the CSR. 

oes ; This subroutine reports error >>>>> 9101 <<«cc, 

1 3° 

13053 063774 004737 030172 JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 

13054 064000 103402 ecs 2s ;SKIP AROUND TEST EXIT IF NO FATAL ERROR FOUND. 

coor 064002 000137 064270 JMP 60$ sRESET FAILURE, ABORT THIS TEST. 

1 ie 

ord ; Set up for Transmit interrupts. 

ge 

13059 064006 106427 000240 2s: MTPS @PRIOS ;DISABLE DEVICE INTERRUPTS. 

13060 064012 SETVEC TXVECA,@TXDMA, OPRIOS ;SELECT OMA TX INT SERVICE RTN. 
064012 012746 000240 MOV @PRIOS, -( SP) 
064016 012746 041064 MOV @TXDMA, -(SP) 
064022 013746 002270 MOV TXVECA, -( SP) 
064026 012746 000003 MOV @3,-(SP) 
064032 104437 TRAP CsSvECc 
064034 062706 000010 ADO #10,SP 

13061 064040 SETVEC RXVECA, @RXCHRS,OPRIOS ;SELECT RX INT SERVICE RIN. 
964040 012746 000240 MOV @PRIOS , -(SP) 
064044 012746 040570 MOV @RXCHRS, -( SP) 
064050 013746 002266 MOV RXVECA, -(SP) 
064054 012746 000003 MOV @3,-(SP) 
064060 104437 TRAP CsSvec 
064062 062706 000010 ADD #10,SP 

pot 064066 106427 000000 MTPS @PRIOO ;ALLOW INTERRUPTS. 

1306 i? 

fpeee ; Trenemit, receive, and check 512 byte date patterns. 

1306 8° 

13066 i* 

cee! i; Initielize the 512 byte pattern and the verious dete pettern pointers. 

i s- 

13069 064072 005001 CLR R1 ;CLEAR THE DATA BYTE COUNTER. 

13070 064074 012702 004012 MOV @BUF BAS ,R2 ;GET THE BASE OF THE DATA PATTERN GUFFER. 

13071 064100 110122 63: MOVB R1,(R2)> sWRITE A BYTE OF THE DATA PATTERN. 

13072 064102 105201 INCB R1 ;GET THE NEXT BYTE FOR THE DATA PATTERN. 

13073 064104 001375 BNE 63 ;LOOP UNTIL FIRST 1/2 OF PATTERN IS DONE. 
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HARDWARE TEST 


13074 064106 
13075 064110 
13076 064112 
13077 064114 
13078 064116 
13079 064120 
13080 064122 
13081 064126 


13126 064264 


- 


105301 
110122 
105701 
001374 
110122 
005201 
020127 
001373 


012701 
004737 
012702 
012703 
012704 
004737 
012737 
012737 


004737 
103033 
012737 


004737 
004737 


004737 
012737 


004737 


106427 


013700 
104436 


013700 
104436 


012737 
004737 


033176 
031554 


033232 
021644 


037154 


000240 
002270 


002266 


021666 
034502 


002366 
005466 


005466 


005466 


005466 





SEQ 0323 


83: DECB Ri ;GET THE NEYT BYTE FOR THE DATA PATTERN. 
MOVB R1,(R2)+ sWRITE A BYTE OF THE DATA PATTERN. 
TSTB R1 s;CHECK FOR DONE WRITING DATA PATTERN. 
BNE 83 ;LOOP IF DATA PATTERN IS NOT DONE. 
108: MOVB R1,(R2)+ sWRITE A BYTE OF THE 32 BYTE OVERFLOW REGION. 
INC Ri sCOUNT THIS BYTE. 
CMP R1,¢@32. sTEST FOR 32 BYTES WRITTEN. 
BNE 10$ sLOOP UNTIL 32 BYTES ARE WRITTEN. 
3¢ 
s Specify 9.6K beud, 2 stop bits, even ety end 5 bits per cherecter. 
; Perform DMA transmission and reception of 512 byte date pettern. 
| ed 
i¢ 
; The following routine reports the error with numbers 914 thru 921. 
’ LPR CHA bit error flegs may be set by this subroutine. 
— 
128: MOV #156740,R1 39.6K BAUD,2 STOP, EVEN PARITY, 5 BITS/CHAR. 
JSR PC ,GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
MOV @BUF BAS ,.R2 sSET UP THE START ADR OF THE DATA PATTERN. 
MOV #512. ,R3 sSET UP THE DATA PATTERN LENGTH. 
nov #1,R4 sSPECIFY TO SEND 1 DATA PATTERN TO EACH LINE. 
JSR PC , VANSUP sSET UP “VANILLA FLAVORED” TX/RX. 
MOV #177740, IBM sFORM BIT MAP OF UNUSED BITS FOR 5 BITS/CHAR. 
MOV #9115. .ERRNBR ;SET ERROR NUMBER TO 9115. 
;¢ 
; This routine reports erros with numbers >>>>> 9115 thru 9117 «<<<, 
ge 
JSR PC ,PUFIFR sPURGE THE DUT RECEIVE CHARACTER FIFO. 
Bcc 60% sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
MOV #9118. ,ERRNBR ;SET ERROR NU“3ER TO 9118. 
JSR PC ,PURRXB s;PURGE THe RX CHAR BUFFER IN MEMORY. 
JSR PC, INIDOMA sSEND TYE FIRST BATCH OF DATA PATTERNS. 
3° 
; This routine reports the error with numbers >>>>> 9118 thru 9123 <<<«<<, 
JSR PC ,ROCHRS sREAD AND VERIFY THE RX CMARACTERS. 
MOV #9124. ,ERRNBR ;SET =RROR NUMBER TO 9124. 
3¢ 
; This routine reports errors with numbers >>>>> 9124 thru 9127 «<<<<<, 
ge 
JSR PC, TXRREP s;REPORT FINAL ERRORS FROM RX/RX. 
3*¢ 
; All done. Have either run out of ective lines, or completed the test. 
; Diseble interrupts. 
’ Cleer the interrupt vectors. 
7 
MTPS @PRIOS sDISABLE DEVICE INTERRUPTS. 
CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 
MOV TXVECA,RO 
TRAP Cscvec 
CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 
MOV RXVECA,RO 
TRAP Cscvec 
MOV #9142.,ERRNBR ;SELECT NUMBER 9142 FOR THE NEXT ERROR REPORT. 
JSR PC ,REPSMR sREPORT ERROR SUMMARIES IF CALLED FOR. 
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SEQ 0324 
HARDWARE TEST - SHTOMA - 
13127 064270 106427 000240 60%: MTPS @PRIOS sDISABLE DEVICE INTERRUPTS. 
13128 064274 005037 002362 CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
13129 064300 ENDTST 
064300 L10103; 
064300 104401 TRAP CsETST 





ne re a 
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HARDWARE TEST - REPBMP - 






















SEQ 0325 





13131 -SBTTL HARDWARE TEST - REPBMP - 

13132 yee PROSE AEEEAEEEESEEEAEDEEDESEAESESESEESAERESESEREREDEREDERDEEDEREDEEEEEEEES 

13133 3@ - Report any BMP codes in the queue - 

13134 34 This is @ pseudo-test used to report any BMP codes thet were found 

13135 3¢ in the DUT's FIFO during previous test, end logged in the BMP code 

13136 34 queue. 

13137 34 It is unlikely that running this pseudo-test alone will produce any 

13138 34 error reports. 

13139 34 

13140 i-- SOSA EEESEAEAAAAE ESAS SEHEEEHEEEEEEEEEEEEEEAEEEEES AE SEEEAREREREEEEREEEDS 

13141 064302 BGNTST 
064302 T41:: 

13142 000051 TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

13143 064302 012737 000051 002364 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (93) 

13144 064310 012737 177777 002362 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

13145 064316 013702 002660 MOV BMPCOP ,R2 sGET THE CONTENTS OF THE POINTER. 

13146 064322 012703 002662 MOV @BMPCQB,R3 sGET THE START ADDRESS OF THE QUEUE. 

13147 064326 020203 CMP R2,R3 sSEE IF THE POINTER HAS MOVED FROM THE BASE. 

pee 064330 001411 BEQ 603 sEXIT NO CODES IN THE QUEUE. 

1 3° 

‘reat ; There is at least one BMP code in the queve. Report the error. 

13151 3- 

isan sReport error BMP CODE FOUND IN TEST nn, BMP CODE:nnnnnn” 

131 

13154 064332 012701 024163 MOV €M9304,R1 sPASS THE FIRST MESSAGE TO BE REORTED. 

13155 064336 ERRDF 9301,E€M9301,ER9301 ; >>>>> ERROR @9301 <<cc<, 
064336 104455 TRAP CSERDF 
064340 022125 -WORD 9301 
064342 024046 -WORD EM9301 

— 064344 026600 -WORD ER9301 

156 

ee 064346 012737 002662 002660 MOV BMPCQB,BMPCQP ;SET POINTER BACK TO THE BEGINING OF THE QUE. 

13158 

13159 064354 005037 002362 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

13160 064360 ENDTST 
064360 L10104: 

064360 104401 TRAP CSETST 
t& SS 








[ PuneeeaaA AMuuwet o@ Teer AbDTAa iA MAFLAA VALE AA ~ ca et am Pe ae po es 
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HARDWARE TEST - REPBMP - 






SEQ 0326 










13163 ; SASASSSCASKSAAS SA SAAS ASKS SS SS AS AAAS SAAS SS SSSA SS ASAS AS SSS SAAS AAS SSS SSS SASK KS 

13164 3 

ahead 3 VOHE . HWQ 

166 3 

3 167 ; SESASAAASAA KAKA AS SK SS SASS KK SSSAASSA ASKS SASS SS SS SAAS SSAA KS SSSA SSSA ASASSS KASS 

13169 

13170 

13171 .SBTTL HARDWARE PARAMETER CODING SECTION 

13172 

13173 

13174 

13175 zee 

13176 ; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 

13177 ; THAT ARE USED BY THE SUPERVISOR 10 BUILD P-TABLES. THE 

13178 ; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

13179 ; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

13180 ; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

13181 ; WITH THE OPERATOR. 

13132 3-- 

13183 

13184 064362 BGNHRD 
064362 000015 -WORD L10105-L$HARD/2 
064364 LSHARD:: 

13185 

13195 sDEVICE CSR ADDRESS QUESTION: 

13196 064364 GPRMA HWPTQ1,0,0,160000,177776, YES 
064364 000031 -WORD TSCODE 
064366 064416 -WORD HWPTQL 
064370 160000 -WORD TS$LOLIM 
064372 177776 -WORD TSHILIM 

13197 sDEVICE INTERRUPT VECTOR QUESTION: 

13198 064374 GPRMA HWPTQ2,2,0,40,776, YES 
064374 001031 WORD TSCODE 
064376 064434 -WORD HWPTQ2 
064400 000040 -WORD TSLOLIM 
064402 000776 WORD TSHILIM 

13199 sINTERRUPT BR | EVEL QUESTION: 

13200 064404 GPRMD HWPTQS5,6,0,177400,0,6, YES 
064404 003032 WORD TSCODE 
064406 064467 WORD HWPTQS 
064410 177400 WORD 177400 
064412 000000 WORD TSLOLIM 





TSHILIM 


23212 064416 103 123 122 HWPTQ1: .ASCIZ /CSR ADDRESS: / 


13212 064434 111 116 124 HWPTQ2: .ASCIZ /INTERRUPT VECTOR ADDRESS: / 
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HARDWARE PARAMETER CODING SECTION 


13214 064467 111 116 124 HWPTQS: .ASCIZ /INTERRUPT BR LEVEL: / 


13215 
13216 -EVEN 











SEQ 0327 


——————————————— SS a 
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SEQ 0328 

HARDWARE PARAMETER CODING SECTION 

13219 Th ahalabaialaialaialsinisinininisinisnininiininninsiniinisinininininninauinbuuuiiitiiiiitit tt tt tt TL TT TTT RTP ERE PEPE 
& 

13220 ’ 

tr 3 VOHE . SWQ 

1 3 

13223 ; hal ahatabalahaiabatalaiaiaialaialaininninininiininiiisinisininisisisiiiinieiii ei iii titi ttt ttt tt TL TT TTT TT TEPER EEE 
BS 

13225 

13226 

13227 -SBTTL SOFTWARE PARAMETER CODING SECTION 

13228 

13229 see 

13230 ; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 

13231 ; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 

13232 ; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

13233 ; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

13234 s MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

13235 ; WITH THE OPERATOR. 

13236 s-- 

13237 

13238 3 NO SOFTWARE QUESTIONS ARE INCLUDED. 

13239 3 BGNSFT 

13240 

13249 3 ENDSFT 

13250 

13251 

13258 EVEN 


-— 
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13260 
on 1 SKC SSAA SASS AS SSK SAAS ASKS AS SSS SS SSSA SAAS AA AAA SAAS SSS SS we 
13262 ; ; 
feos : FVTSKL6.P11 
; 
To ;AACSCAS CA KS ASAA KS SG GA SAAS S AA AKASAKA KGHGSCSS SGC SASK KK SA ASASAK KSA GAA KA AK Se hobs 
1 
13267 
13268 
13269 064514 $PATCH:: 
13270 064514 -BLKW 24 
13271 
13278 
13279 
13280 
13281 
13282 064564 LASTAD 


064564 000000 .WORD 0 
064566 000000 .WORD 0 
064570 LS$LAST:: 

13283 064570 ENDMOD 





SEQ 0329 


13291 000001 - END 





ores aera aaearmrammnareaeraaaaaereearenemaacmaarcemaacarreaaaarenaemmaaaaeeaaeaciaamnaaea taal 
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Symbol table 


ACTLNS 002272 
ADOR 036032 
000020 


BITO = 000001 
BITOO = 000001 
BITO1 = 000002 
BITO2 = 000004 
BITO3 = 000010 
BITO4 = 000020 
BITOS = 000040 
BITO6 = 000100 
BITO7 = 000200 
BITO8 = 000400 
BITO9 = 001000 
BIT1 = 000002 
BIT1O = 002000 
BIT11 = 004000 
BIT12 = 010000 
BIT13 = 020000 
BIT14 = 040000 
BIT1S = 100000 
BIT2 = 000004 
BITS = 000010 
BIT4 = 000020 
BITS = 

BIT6 = 000100 
BIT? = 000200 
BITS = 000400 
BIT9 = 001000 





OHAHHOHHOHOAHOAOAHAHIAIAHGAHIAHIAHAIAHAHAHIAIAAIAIAIAIAIAAAHAAAAAAAAAAHAAAAARHAAAGA AH AAO oO 


DHAGDOAHHOGAHHHARGHVHAHAHAHARDAHAAHAAH 


C$GPHR= 
C$GPRI« 
CSINIT= 
C#INLP= 
C$MANI= 
C$MAP = 
C$MEM = 
CSMMU = 
C$MSG = 
CSOPNR= 
CSOPNW= 
C$PNTB= 
CSPNTF= 
C$PNTS= 
CSPNTX= 
C$PUTB= 
C$PUTW= 
CsQIo = 
C$RDBU= 
CSREFG= 
C$REL = 
CS$RESE= 
C$REVI= 
C$RFLA= 


EF .RES= 
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EF .STA= 
EFOSO3 
EFOS505 
EF 1401 
EF 1402 
EF 1601 
EF 1602 
EF 1603 
EF 1604 
EF 3001 
EF 3002 
EF 4401 
EF6401 
EF 7801 
EF 8401 


3 
s 
3 
o 


005630 


010727 
010765 
011033 
011206 
011351 
011530 
011573 
011733 
012112 
012161 
012331 
012377 
012553 
012557 
012647 
012737 
012773 
013153 


DOHOOHAOHGAAGAIHAIAHAAHAIAIAIAHAIAHAHAHAHAAHAHAHHAHAAHADAHAAHAAAHAAAHAHAHAHAAARAHAHADH 


017722 


DHOAHHHHAHHMDAHHAHAAHAHAHAAAHAHAAAAAAHAAHAAAHAAAAHAAAAHAAARAAAHAARHAAAAAARAAAGAAD 


SEQ 0330 





EM3101 
—€M3102 








DODHHOHHOHHHAHHHHIHHAIAHAIAOAHAIAHIHUAAIAIHOAOAIAHAAUHHUHAAAAAAAHAAARHAAHAAHAAARAHAAHAAAOH 





023275 
023313 
023407 
023433 
023513 
023572 
023647 
023703 


DHHGHHHOHHOHAAIHOOHOHOHOAHGHAHHHAAUHAVAHAHHHA BAHAHAHAHHHHHAAD 


an 


CVDHEBO DHV11-M TEST, ORION UFD MACRO YOS.02 Wednesday 
Symbol table 


FSMOD = 
FSMSG = 
F$PROT= 
FSPWR = 
FSRPT = 
FSSEG = 
F$SOFT= 
F$SRV = 
F$SUB = 
F$SWw = 
FSTEST= 
GE TCHR 
GETLP2 
GETPRM 
GETTIM 
GMANWD 
GPRSOB 
G$CNTO= 
G$DELM= 
GsDOISP= 
GSEXCP= 
G$HILI= 
G$LOLI= 
G$NO = 
GSOFFS= 
G$OFSI= 
G$PRMA= 
G$PRMD= 
G$PRML= 
G$RADA= 
G$RADB= 


000000 
000011 
000021 
000017 
000012 
000003 
000005 
000010 
000002 
000014 
000001 


aoa an 


AHAHAARHARHHAD 
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I$SINIT= 
IsMOD = 
ISMSG = 
I$PROT= 
ISPTAB= 
ISPWR = 
ISRPT = 
I$SEG = 
I$SETU= 
I$SRV = 
I$SuB = 
I$TsT = 


L$IcPe 
L$INIT 


000041 
000041 
000041 
000040 
000041 
000041 


ADOHAHHOOHAHAHHAHHAIHHAHAIAHAHAHAHAHAHAHAAHAAAHAVRHHHAAAHAARAAAAAD 









SEQ 0331 





DOHOHHHOHAANHAHHHOHHAHAHARHHAO|A 
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Symbol table 


Fi 

® 

8 

B 

~~ 

~ 
OHHHHHHAMHHAAAHAMHAAH 


OPTION 002262 G 
OSAPTS= 000000 





nl 

oO 

w 
eonuunununnuan 





000000 RESETT 
000000 RMATBB 
000000 ROLDAP 
000001 RRXNON 
000001 RSTRPT 
000001 RTXNON 
000001 RXBCNT 
000000 RXBDTX= 
002474 G RXBEND 
002514 G RXBETX= 
002474 G RXBFUL= 
002476 G RXBIPT 
002500 G RXBOPT 
002502 G RXBRRT 
002504 G RXBSTA 
002506 G RXCHRS 
002510 G RXCNTB 
002512 G RXDONF 
002376 G RXDSBL 
000016 G RXENBL 
002514 G RXIEO 
002534 G RXIE1 
002514 G RXINPT 
002516 G RXINTC 
002520 G RXINTF 
002522 G RXPTRB 
002524 G RX TOUT 
002526 G RXVECA 
002530 G ROSLOT= 
002532 G R1SLOT= 
002436 G R2SLOT= 
001000 G R3SLOT= 
005516 G R4SLOT= 
005474 RSSLOT= 
002000 G SAVBMP 
000000 G SAVPRI 
000040 G SAVTEN 
000100 G SCBCTB 
000140 G SCBCTE 
000200 G SCNSTB 
000240 G SCNSTE 
000300 G SCTPTB 
000340 G SCTPTE 
005344 G SOPBAS 
032640 G SOPEND 
032722 G SOP2B 
033004 G SOP2E 
033176 G SETPAR 
002302 G SFPTBL 
000002 G SKPSTS 
033232 G STATA 
033604 G STATO = 
033636 G STGTRB 
034056 G STPSW 
034140 G STSTB 
034350 G STSTE 
034502 G sucss 


034530 
002340 
034642 
034674 
034734 
035316 
003066 
000030 
003270 
000020 
000100 
003064 


ADOOHOHAOAHOANGAINHAHAIAIAHIAHAAHAHAAHAHAAAHAHAAAHAHAVHAAARDAARAVHAHAHAAAHAHAAAAAA 
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SVCGBL = 
SVCINS= 
SVCSUB= 
SVCTAG= 





MHOAHDHHADGANGAAHAHAHAAHAH AHH AHAHHAARHAHAHAAHARHAAARAAAHAARAAAHAD oo 


































SEQ 0332 


T$HILI= 000006 
T$LAST= 000001 
TS$LOLI= 000000 
T$LSYM= 010000 
T$LTNO= 000051 
T$NEST= 177777 
T$NSO = 000000 
T$NS1 = 000004 
T$PTNU= 000000 
T$SAVL= 177777 
T$SEGL= 177777 
T$SUBN= 000000 
T$TAGL® 177777 
T$TAGN= 010106 
T$TEMP= 000000 
TSTEST= 000051 
T$TSTM= 177777 
T$TSTS= 000001 
T$$AU = 010033 
T$$AUT= 010030 
T$$CLE= 010031 
T$$DU = 010032 
TS$$HAR= 010105 
T$$HW = 010000 
T$$INI= 010027 
T$$MSG= 010024 





DHOKWHOHHOHHHHHAAHMHAHAVHAANHHAAHAHAD 
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Symbol teble 


134 057034 G 
T35 057500 G 
136 060124 G 
137 060624 G 
138 061552 G 
139 063350 G 
T4 043400 G 


- ABS. 064570 


000000 
Errors detected: 


T40 063732 G 


T41 064302 G 
TS 043562 G 
T6 043740 G 
17 044142 G 
T8 044334 G 
19 044526 G 


000 = (RW, I, GBL, ABS, OVR) 
_ CRW, I,LCL,REL,CON) 


#e¢ Assembler statistics 


Work file reads: 
Work file writes: 
Size of work file: 
Size of core pool: 
Operating system: 


296 

312 

34680 Words ( 136 Pages) 
19714 Words ( 75 Pages) 
RSX-11M/PLUS (Under VAX/VMS) 


Elapsed time: 00:59:22.86 
CVOHEBO. BIN, CVDHEBO.LST/-SP=SVC40/ML ,CVDHEBO.P11 


UAM 
UNBT TB 
UNITN 
UNSDIV 
UPDCHR 
VANSUP 
WAIBIC 


= 000200 G 


002320 G 
002276 G 
037234 G 
037370 G 
037466 G 
037664 G 





WAIBIS 037740 G WTWLPR 040324 G 
WAITTX 040014 G X$ALWA= 000000 
WOPDR 040054 G X$FALS= 000040 
WORD1 002400 G X$OFFS= 000400 
WTWLNC 040250 G X$TRUE= 000020 
WTWLNS 040300 G $PATCH 064514 G 


